8^ 



(3^mbwu\ibb 



tain's Bes 



iBuy F^or The Sinclair use 



Raise your glasses 



• introduce Bridge 
toyourzxei 



r 






«K^ 






DOWN AND 
DOWN AGAI 



The deeper you dive, the 
Sleeper the danger. Through 
^cavern after cavern to find the 
pearls and the treasure. (It's differe 
ievery game!) Sharks, octopuses and 
jjellyfish are everywhere; and look 

out for your oxygen level / 
Staggering graphics, fantastic c 
- a true arcade adventure 

^Another great quality game from 
the house which brought you 

"Harrier Attack! "and 
"Jungle Trouble" 

DURELLsofTW 

?W. H.SMITH* LASKYS- 
o>^NGRfpNS at DEBENHAMS' 
"-^ ! SJBOOTS" MARTINS - 
^COMPUTERS FOR ALL 
^SPECTRUM CENTJ 
-s and many other 
, vv retail outlets 

Ctrum WK'W 



msz^-y 



i 




'I COULDN'T BELIEVE THE SPEED. 
YOU'RE THE BEST BY FAR" 

(Paul Singleton, Cheshire) 



1H SPEECH SYNTHESIZES 



WMSSMMMMmm 

WAR OF THE WORLDS TASWORD 2 



JACK & THE BEANSTALK 

ZIG ZAG HESrsSsK 
THEFALL OFROME V£K 

MUjGSYj£S£T" — '° i ,.. m , 

CCjDENAME MATJSZSSEi 

HUNTERKILLERJzrr^-: 

PAINTBOX isrssr?: 



titir itrUtnd tot Iht Sptanim ' ' iHomtCorapVfklv). 

THEFOREST 



CURRAH SPEECH 



ONE PROGRAM FREE! 



b9*ftPopCompWklr/r"UM0fi 
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s judgement on another selection why not have 

"— nputing sent I 



A prije for everyone in our UNIQUE Agony aunt of the algorithm world, 




Exploring the Sinclair QL — 
An Introduction to SuperBASIC 
Andrew Nelson, £4.95 

The QL has a rich, new programming vocabulary. 
,"i:i;1 ihiK great book owes you :he chance d 
the host of new words Sinclair has added. Sure, 
you can use the QL more or less just like a 
Spoon l;i:i. but :f you do voli ; 
extraordinary power which lies behind the radical 
concepts of Super BASIC Cobtimaitd by command, 
s:i-bte:ris:it by ;jvii?;:rioj:i Aidiir.v '-lolson takes you 
through the richness of QL SuperBASfC in 
Exploi ing the Sinclair QL — An Introduction to 
SuperBASIC Just £4.93 and available from n 
book and computer shops. In case of difficulty, you 
can older it directly from Interface Publications, 
using the coupon below. (Trade only: Interface 
Publications are distributed exclusively in the UK 
and Eire by W H S Distributors. Export 
orders handled by Interiace Publications.) 



iiiterrke 

PUBLICATIONS E 

We're the experts! - 



THE 
DATA RECORDER 

DESIGNED FOR RELIABLE SAVING & LOADING OF COMPUTER DATA 
COMPACT SIZE 

HIGH RECORD LEVEL 
AUTO STOP 



3.5mm JACK -LOAD 
2.5mm REMOTE 
3.5mm JACK 'SAVE. 
7 PIN DIN SOCKET- 




ffleoui 
micro/ 



SPECTRUM £24.95 




ZX81 £27.95 

ELUDING INTERFACE 



GUARANTEED FULLY COMPATIBLE 
WITH SPECTRUM & ZX81 OR YOUR MONEY BACK!! 



LOOK!! SUPER SOFTWARE SSmSSSSb* 



Jjff "" " PURRRFECT VALUE lapei for computer 


mwa 


SPECTRUM 4SK 


Road Race 

'-« "■■■ 

Soccers., id, 

"-t;:t } 


Golf pi., • 
Bar Billiards 


Kludofn,2.„* 
Battleships 


Slormforce 
Starbuster 


Invation 
Gunner 

Master of 
the Rings 


FISHY DICK 

°y £3.50 


ONLY 

£3.50! 




spectrum <£J.so«ch) 2 SUPER GAMES 
£6.00 r r*,.,». ON EACH TAPE!! 


ZX81 (J. 50 each) 

£6.00 forI,.pc. 



£6.00 !„!,.„. 



ALL Tape Prices inciuJc Po5i; W :ui J Packing and VAT 

Dala Recorder ADDfl .50 Postage. Packings Insurance 

Allow 7 — 14 days for delivery 

Send cheques or Posial Orders only 

Overseas orders for software lapes onl}! (ADD £1.00) 



ffleoui micro/ 




welcome 




those intsrested) and myself 


many games 


progi 


ms are 


ZXB1 failing after3 months. 


V SOi ^y^jJB"^ 


iHH"i?5r'i 


published. Mini 


de. 


SZi 


R W J Payne, good idea. I'll try 
knowledge* ™ " 8 "' 


MtfwL 


entered ihe inlo. The experts 






ority of 


Mike Jepson and Arie Baars 


ProVe^anylhrng. 5 1 wS* e-pfain 


is about right. 


feelth 


t the rest 


sorry folks, wa haven't any 
copies, may 1 recommend Toni 




Action 






Machine Code on YourZX Spec- 


Assessment 


These trends 


vers n 


liced as 


M?V^v^ 8 g^d d how about 










i.uh.-iori 






Although 1 496 is only a small 


together and If 






Mrs. V Jones, 1 7 Hoding Drive, 






















o try to 








keep :his b.ikin 










wouldn't be ready! - It is 












enough to take as a proportional 


machine code 






ability. 




mp |f B you t |ookat the age range 


panied by a pie 


mare'" 


i -p. ■ 


S C Arnold, interesting regular 


usa users ■ ' |1 








ile.-i'cl 


S Franklin, F J Gardiner and M 










of Toni 






Each of the sub-headings in [til 


Bakers prog ran 






sorry folks, you're in the mmo^ 




next two sets. User and Reader. 








ty but entitled to your opinion. 


phone calls to the United States, 




grammers. 1 a 






JP.acentini.ye 5 16KSpeeIrum 


one to Mary Rhineman of 


each e S!nerarslve.™co fl mbfna 


way To get tf 


e best 


of both 


prog 5 willrunona4SK. 


Sinclair Research and one to 
Time*. 




The highest 








Although Time* has 












withdrawn (rum the market and 






andT 






Sinclair does not intend to sell 












ihe Spectrum in Ihe USA. :lv 












QL will be on sale though - 












"I'll" '■: regelating for a coir 














reade'rs'hVis TonceZTlThinl 


Answers 






'oP.-ii.-isl.Gvaidis, IKCor-a la.is 
would lynch us, note 'ac. of 


Toltwa^ co^pttJbta ^"f^ 












tS2068 




Although 1 just 






Pedro Inglesias, sympatr-es ... 












being charged 725 r.-,. ■ s 












l£3.35)periBsue,toACaeM..- 










Some 








brief replies I'd 






HFL16 [£4.u0land S. Barry ■■ 












Dubai who parts with £9.Hb! 




INT calculations which does not 








F'.Kiv- Vi-iieimg, thanks. 


theTS2068 from which, .riiii.il 



Jg^, 



Ha.VU/WM, 


« a nug,sof749 








Under 2! 


2 J -35 


Over 35 




3B% 


32% 


29% 


,.,.;,- 


Games 




Other 




S?% 






Reader 


Regular 


Ate* 


occas'n'i 




67% 


32% 




Spa< s. 


Too much 


OK 


TOO MA, 




3S% 


50% 


11% 




2% 


39% 


58% 






70% 


20% 




6% 


75% 


18% 




3% 






-..v./- ,-:...: 


5% 


80% 






f% 


28% 




■If C-j* 


S% 


34% 





Competition 
Blunder? 


latest edition of ZXC 

thought you might like 


Dear ZX Computing 


word processing 


Computing" 1 noticed thai in the 
competition, Ray Eider made a 

Kninht" and it was meant to Be 

"Michael Knight". 

Mand'y Stenhouss, Simon 


of a 48K Spectrum 
Shinwa CPBO prime 

interface 1 . The com 
Interface 1 are mount 
DKtronics keyboard. 



r by pressing CAPS MastertMe 



iterface 1 . 

■■VA&\1: 






Spectrum set-up 



10 LET c 

20 LET t 



; TO 3: FOR 1-1 



60 INPUT "Enter 
GD TO 60 



S : READ ■*! 



FOR n=4 TO 1 



ount>*lB0);"Z";TAB 19; INT C> 

290 PRINT '"Spacei Tod mucr 
300 RESTORE [ 



:;TflB 9; INI 
00l! , 'X"iTO 



B 25; INT ( t 

320 NEXT i 
8999 STOP 



9020 LET atn.VAL a*)=a(n,V0L i 
9999 DATA "Games "."Util 'a","RB 









ch a rou 
















noying at 


tude for 










A pus 






problem is 


a new pa 


ckagesoon 


Microdots 


Dftware ( 


eead o'aae 


9S ZX Con 
1 phoned 

-..;■! y 1 .-.;-. 


puting Ao'/May84l. 


ul and in 


ormed me 




ould mo 


a than rec 


tiv \:,«. 






JTZ!£m 


'i"'':'\" 










wher-itT 




liable. 








ll.i.: Vi;:n, 


st packag 
Keep up 


le°good 



$50 (NormallyS79).So.. 



Long Live The 2X81 



lyjoking) I thought I might at 



Helpful Hints 

Dear Sir, 



m page with some hints o( th 



Glorified 
Catalogues 

Dear Sit. 

U.K.whenlhappened 
the ZX Computing r 
What a relief to find a pi 






programmes to suit the Timex 
Sinclair 2068? 



,.o;:y rtijularly but other p 
nKr>. -i-.n- Users Clubs wou 



■arlyalwaysbesyn- 



• Free memory (16-48K);PRINT65536 - USR7962 ; "bytes". 

• Scrolls : 

RANDOMIZE USR 3280 : acrollt whole page up one line 
RANDOMIZE USR 3330 : scrolls whole page to first line. 



1BORDERI1 
i page. I BORDER!) 
lanual. Chap. 16 Page 



• Change cursor : li 
This depends on the 
POKE 23658,0 : giv 
POKE 23658,8 : giv 
RANDOMIZE USR 4 

POKE23B17.236 : 



rt of FLAGS 2 al address 2365B. 
: changes caps lo lower case, and 



POKE 23606.X 



'6/92/T 



Trval 



nl char; 



POKE 23758,0 

• Another method foryour programs: 

1 UfT. * = PEEK 23637 + 256XPEEK 2363B:POKE A 

2 REM ImmiNMtllMLINE ZERO lllllll!l!MIIN! 

• A new kind of DRAW can be obtained with the X co-oi 
last point plotted at address 23677 and the Y co-ordina 

)ttedataddress23678. 

• Save memory : 
. I for SGN PI ; 3 for INT PI, 

Use VAL "number" for the other numbers. 

1000000" or better VAL'le 



RANDOMIZE USR : resell all the Spectrum 
POKE 23755,100 : the program disappears . 
POKE 23755,0 : and it comes back 



exploding BORDER, it will si 



1 PEM T0:2X COMPUTING 

PROGRAM DEPT. 
5 PRINT 
THIS 15 A LISTING TECHNIQUE THAT 

hL_.04S -. OU TO sfe . it-j THE LI:TI% 
E-fiCTL/ THt SH'iE AS THAT PRINTED 



OH THE SCREEN. 



I THE PROGRAM 



A SCREEN DISPLAY 15 EASIER 
TO PLAN INITIALLY, OR TYPE 
FROM LISTINGS, IF: THE PRINT 
COMMAND LINE 15 PADDED OUT 
UTTM SPACES. i BEFORE SUOTEi 



110 PRINT 
LINE 1__0 SHOWS THE SCRAMBLE SEEN 
IN MOST PROG--- LISTINGS. THEY 
PRE DIFFICULT, SND EYE-STPAININl- 
TO TYPE FROM. " 

" " 1 PRINT ' ~ 




„ ,'RINT 

IT IS BEST TO PRINT THE C E _= _. d h _■ 
SCREEN i. A3 IN LINE 10(3 i , AND ""£:- 
RE-EDIT THE ■ -■■■£ AND CHANGE THc 
COMMAND AFTEPUPRDS IF REQUIRED." 

10 , PRINT 



S.IF:THE PRINT 

COMMAND LINE IS PADDED OUT 
UITH SPACES ■-" 



(LET STATEMENTS CAN ALSO BE USE 
AS SHOUN IN LINE 150.)" 
150 LET Pl= 


D 










A SCREEN DISPLAY IS EfialER 
TO PLAN INITIALLY, OR TYPE 
FROf LlSTIM_-_-.il- THE PRINT 
COHMAND LINE IS PADDED OUT 
UTTH SPACES. ^BEFORE QUOTE) 













LISTINGS ARE EASIER TO DECIPHER 
USING TMI5 het-lC- .AL THOUGH EXTRA 
MEMORY IS USED . " 



Animation 

Dear ZX Co. 




i v pe in Ben Rimmer's neat pro - 


wall walk . - . 


9ra Or.e t t'hina b ™ng'e^ed me 


corrections! 






'-nge Dl disproportionate 


What?. .Not Enough Data? 


^ m ^tp , )'..i e -. S '| k *| ,, .''c-m- 


Several readers complainet 




























listing 1 to set up the UDG's 




and listing 2 which was Wa 






Line 20 Ltl aS - "BCQDDFG- 








RSSSSTTTVWWXYZ" 




Una 2 4 LET 




bS -"AAEEEEEIIOOOU" 




Une 40 change 121 * RMD) to 


167 il_ra-items - guarantee 



atoyoutorsottwi 



10 FOR i = USR "a" 
"a" + .45: READ <: F 
NEXTi 

Apologies to thos. 
whose attempts with . 



ABF 

/UMMER 

MAIL ORDER ONLY 
/AVIMG/ 





IZX81 PROGRAMMING! 



I. in the beginning 



Anyone for *_ 

^^^^^^^^^^^^^^^^^^™ ^^^^^^^~ LBHIDGE Expended to i 

Bertil Forss from ss™i,™r?£" 

Switzerland discusses the k&e7™.Z, »' 

problems involved in ."«.»».»»,■«■« 

creating a bridge ~»'.: 

program. » 



. The program there- 







|ZX81 PROCRAMMINCJ 





C: 1075*. 








D; KOS 








H: RIO 






C: R9S 


5: KQSS 


C 


K3a 


D: 7 







R.J&4. 


H s 9754. 




H 


D632 


S: J10753 


D ; 1B9S32 
H: KJ6 


S 




Kg 3 


S : Bi 







subroutine selects one of three This process was 
possibles: until the budgstiH 

Double after 3 of notrumphO gram it ta Important 






nen t thought the 



if NS has the game) to play possibility and could hang 
ie next card to play or it on the situation until I had 

s. one for each case for The following might give 



plav- KBRIDGE just takes any proach t, 
TERM displays the result and to play bi 



ita value" cVo'f ?■ C rlT 9in9 Program 

the value, CS, of a card to. structure 

CHRS (CODECS +■ 85) 

. . „ Figure 5 shows the layout of Di 

Apiayed card can be earmark- the program. SETUP contains Di 



Repeat the same deal and 
mds (Figure 3) 



u do? My approach was to 




■ZX81 PROGRAMMING^ 








KS»' " 
















































N = 52 TO 14 
























i!I-Kt il TO 






























































































<SIP TO P+l 


i =KS IP 




















































695 


NEXT 










Flg.8 




















- 1 -■ 
















3B4-0 


if : 


NT (CODE K1 


(Mi /:« 




TH 












3050 












fm- 













Similar pro- 
r in ABRIDGE. 



2027-2050 (Figure 9) e 



BBRIDGE: KBRIDGE + 
level bidding 
PBRIDGE: KBRIDGE + 

MBFIDGE; ABRIDGE + 
manually defined deal 
CBRIDGE: BBRIDGE + 
manually defined deal 
QBRIDGE; PBRIDGE + 
manually defined deal i 

: BRIDGE: ABRIDGE + 



ABRIDGE is 
ed. The cur 

h the coor 


Savi 

Buy! 


g all daia 
OBRIDGE 

g a Speetr 



ZX81 UTILITIES 



Toolbox Trio 

Mark wenham shows how to add the ON GOTO 

construct while Dr Winf ried steinmuller of Austria 

provides Store and Move utilities — 

All three for the ZX81. 



ONXCOTO/COSUB 



1000 RAND USR 165 14 
1010 REM ON A GOTO 2 
1900.0, 77, ate 



999 REM (C) SINCLAIR 
1000 DIM flit 704) 
1018 FOR 1=0 TO 21 
1020 FOR J=l TO 32 
1030 LET fl*<J+32*I)-CHR» PEEK (P 
EEK 16396+256*PEEK 16397+J+33*! ) 
1040 NEXT J 
1050 NEXT I 

Fig. J BASIC program from Sinclair ZX printer instructions. 

1 REM *********************** 
************************** 

2 POKE 16510,0 

3 FOR A=16514 TO 163S2 

4 INPUT R* 

5 POKE A. (CODE R«< 1 )-26)*16+C 
ODE A*<2)-28 

6 PRINT fl/' "jfli, 

7 NEXT A 




ZX81 UTILITIES 



^B,,, 




„, ^„„.,„..„. J1 „„„„ 




AWUUAMUW. 


fUdr-m 


Htx-Codt 


flddrtu Libel 


Mnemonic 


Comment 


CoPw 


D-FILE 


Into R« 


CALL 3274 


CLEAR from P0I1 


4352 


CD 5fl 14 


15514 Start 


4U95 


31 C3 32 


16S17 


LD BC797 


Set LEN M +3 


40B8 




1S320 


BST 30H 


ExPind vflPS 


4089 


2R 14 49 


16321 


LD HL,;i6404i 


'e-line> 


40BC 


93 


16524 


RDD HL,BC 


Set E-LIMEV 


408D 


CD R0 14 


16323 


CRLL 32B0 


STKBOT/STKEND 


4QSO 


2R 10 40 


16329 


LD HL, (16408) 


(VRRS> 


4093 


36 46 


16331 


LO <HL),78 


LET fl* - 


■4095 


23 


16333 


INC HL 




4096 


36 Zi 


1 633-4 


LD CHLM92 


LEU R* lou Bite 


4098 


23 


16536 


INC HL 




4093 


35 y_ 


16537 


LD <HL),2 


LEN R» high Bste 


409B 


23 


16539 


INC HL 




409C 


EB 


16340 


EX OE-HL 




409D 


s(\ ac 40 


1634 1 


LC HL.t 16336) 


;d-fil£> 


40R0 


23 


16344 


IHC HL 




40fil 


86 IS 


16343 


LD B,ZZ 




40R3 


C5 


16347" LOOP-L 


PUSH BC 


Sive Counter-L 


40R4 


■ 


1634S 


LD B.32 


No. of Columns 


4QR6 


4E 


16330 LOOP-C 


LD C.CHL) 


Ch. from C-PILE 


4BB? 


EB 


16551 


EK DE.HL 




40RS 


71 


16332 


L6 (HL),C 


Put Ch. into RI 


40R9 




16533 


EK DEjHL 




40RR 


S3 


16554 


INC HL 


Next Pos. D-FILE 


40RB 


13 


16333 


INC DE 


Next Pos. fll 


40RC 


10 FB 


16336 


CJNZ 16350 


— > LOOP-C 


40RE 


23 


16559 


INC HL 


SHC N/L 


40RF 




16559 


POP BC 


Get Counter-L 


40B0 


i0 Fl 


16560 


DJMZ 16347 




40B£ 


C9 


16362 


BET 




F&.3 .■*,. c 




c lilting ofscnenstore routine 






«ddre»" 


Hex-Code 


Address Libel 


Hne„cnic 


Comment 


I1C - 


-> RRMTOP 


LC HL,(!S3S8) 


RfWOP old value 


40B3 


2R 04 40 


16363 SUrt 


40B6 


01 31 B0 


16566 


LD BC.49 


LenBth MC 


40B9 




16569 


AND fl 


Reset Cirra FU9 


40BR 


EC 42 


1637-0 


SBC HL,BC 




40BC 


22 04 40 


1637-2 


LC U6398).HL 


Set RflffTOP 


40BF 




1637-3 


EX DE.HL 




40C0 


21 92 40 


1637-6 


LC HL,1S314 


SUrt WC 


40C3 


EC BS 


16379 


LOIR 




40C3 


CO C3 03 


16501 


CRLL 963 


NEU from RCfl 


40C8 


C9 


165S4 


RET 




Fv-4Hexc 


„**rf™*m« 


cfc,^™™™**, 







;s49 bytes, and you ca 
*ith the simple hex load, 
n fig. 2. Line 2 Changs 
Ihe line number of Ihe REM Mr 



e RAMTOP, the 2 



1 4 onabove RAMTOP. You 
t have to care about Ihe 
a ol RAMTOP, since it is 



NEW is executed. If there 
eady a MC routine tesidi 
our RAMTOP, the mo 



RAMTOP is then called by USR 
16563 (fig. 41. With other 
routines, the two bytes after LD 
BC. now equalling 49, have to 
be POKEd with the numbers giv- 
ing the length of the machine 
code routine leg. POKE nl ,232 
and POKE n2 .3 tor 1000 bytes 



Screen store 



5280 
STKEND. 



those 707 bytes. Call 
jsed to set the system 
E-LINE, STKBOT, and 



n FAST mode, this BASIC 
ram needs 20 seconds to 
i, and in SLOW mode even 



30 IF A*--" THEM INPUT A* 

•10 IF A*""3" THEM STOP 

50 PRIHT A*( TO 2) i -: "t 

£.0 POKE X,16*CODB AStCODE i 
-176 

70 LET X"X*1 

EIO LET A«=A*(3 TO ) 

?0 GOTO 30 



ZX81 UTILITIES 



LD HL, (NXTLII 
LD DE.0004 

ADD HL.DE 

LD ICH-ADD) ,l 



ADD A, (HI 
SUB Z8d 
DEC E 



3062 

FEEC 



1E00 
FE76 

28S6 



ZSOB 
FC-6 
280A 
FE26 
3047 



FEU 



CALL 0EA7 


XOR A 


OR C 


JR Z, 19 


RST 20 



INC HL 


INC E 


LD 


A, < 


CP 


1C 


JR 


C,l 


CP 


76 


JR 


Z. 1 


CP 


26 



ED7BO240 
CA&40E 
CD1C15 
C3B50E 



PUSH B 




LD 


_,A 






HI 


HI 


LD 


l,H 




LD 






ADD 


HL 


HI 


ADD 


HL 


HI 


ADD 

INC 


De 


BC 


LD A, (DEI 


SUB 


?fif 




ADD 


A,L 





DJNZ, 14 
LD B,H 

18 LD C,A 
POP AF 

LD SP, IERR-! 
JP Z.0E84 
CALL 131C 
JP 0EB5 

19 RST 08 



00 - I 
WGOTO/GOSUBfuncti, 



I FOR F-I Tl 
• RAND USR 
I REM Oil F ( 



SUB Z8d 
DEC E 
JR Z, 18 
ADD A, A 
LD C,A 
ADD A, A 
ADD A, A 



130 STOP 

TOO PRINT •: 

210 RETURN 

300 PRINT h : 

310 RETUR1I 



'NGOTO/GOSUBle: 



Little Brothers should 
be seen but not heard. 



k&. 



NOW ONLY I 

£159.951 

inc.VAT. 



^■■■■H 



11 which eloquently describes the Brother 



■villi BBC, 



lea 



Less than a fi 



RS-232C interface, the 1 IR-S is compatible ■ 
Spectrum. One, Dragon, Atari and most other home 
's nonetheless loaded with computers and popular software, 

Periecdy portable, the batten or mains operated 
HR-S weighs less than 4 lbs, and has a starting price 
of only £159.95 (inc. W> 

Which is really Miincthing to .shout about 



n/Jvcibi'ls. 

't give you. 



T he little printer that's low 

There's one tiling the I iR-i wo 

For the annoying 'cliiki.'ty rl.uk' many printers |— 
produce is men ilully absent Irom the HR-5. t 

Quietly ellicienl. it delivers high definition ' c 

dot matrix text oyer SO columns at BO characters per | ,, 
second (maximum). 

Text or gra phics with ease. 

The HR-5 also has something ofan artistic bent | " 

Being capable ol producing uni-direi lional l_I 

graphics and chart images together with bi-directional aw 
text What's more it will hone down characters into 
a condensed lace, or exlend diem lor added emphasis. 

At home with home computers. 

Incorporating eidicr .1 (. 'nun inks parallel or 



I 



brother 



n..vv.;iiY.\ |.\y,\s 



^X81CAME 



Mad Miner 



You've got to be mad to 
work in a Plutonium mine 
say J Dave Rogers and 
Colin Hogg of Liverpool. 




ZX81 CAME 



s or plus signs plat 
se fiftv energy 



« ay , iemairis' of previously 
J lifts by firing the laser i 
■ n. If anything is not clear 



venty energy 



The program in 
operation 



'GOTO CODE INKEYS' which 
routes the urogram to different 

which key is pressed . This gives 
faster operation than using lots 
of separate 'IF INKEYS 
EQUALS' statements for each 



lift-complex in the lift shaft. Lifts though as all botto 

^i. ir-n-Gtir q|| v . not m between, reasonable speed is 

and you can get onto a lift In mid- porta nl consider 

mi lint gravity lifts!). ZX81 BASIC! Desp 



Typing tips 



Space, graphic 'gn 



is23o,505. 1010. 



,„,; Along the lines 



272 edited to 'GOTO 2000' 
and line 5 replaced with 
'RETURN' This will then run in- 



b0-b2 


■-■■,<■: mr.v,- riqhi Print-; nan facing right and a space 


V 












53-59 


the time' ^ ^^ '" "'"^'^ ™ n * ,aC ' n9 " 


A 


-Across- coordinate for all ac 




.its lp and down stopping only at walkway levels, 




I lie dnection tor laser, depend 


73-75 


Man move left. Prints man facing left and a space to 


HIM 






the right. 
















the other routines via line 270. 








'Goes to' random lines between 270 and 320. thus 
choosing any one of five randomly occurring wvunis: 


ON, GAP 


CH These set up FOR NEXT loo 
















■-uilT.issed. ie points prime 






BP 


Bonus points. 






SC 








EN 






ing. For example, line 2,'S shuts the doors' into the 




P'int -n strng. Used to s«npl 



Optional extras! 



at annnyingly unpri 



ZX81 CAME 



■„„„, 


, 














3 


GOTO 7030 










3 


REM 

LET 5-X* 


SUBROUT 
33*L*M 


NES- 












D 


6 GOTO 10* 
PEEK SO0I 


CODE INKEY** 


7013 


AN 




10 


RETURN 












50 


LET M=M* 


IM<29) 










SI 

52 


PRINT AT 
RETURN 


L,M-l! 


MCHRS 


146 


„ 


53 


LET FI-1 


- ( 2 AMD 


PEEK 


(8* 


33) 


5-1 

EP F 


FOR F='.n 


+ FI) TO 


<M+Fr*3J 


ST 


L 


55 
1>F 


PRINT AT 


L-1,F|CHR* 


34 i 






36 


PRINT AT 


L,F|CHRB 6JAT L 


F| 



57 NEXT F 

5B LET EN=EN-20 

59 GOTO 910 

62 IF M<2£ AND M>0 AMD M<>9 TH 
EN GOTO 600 

63 LET DI=l-<2 AMD (L-20 OR IN 
KEY*="M"! ) 

64 FOR T-l TO 1+12 AND L>10J 

65 LET L=L+DI 

66 PRINT AT L.MICHR* 146IAT L+ 
I.MJCHR* 132 

6? IF DI-1 THEN PRIMT AT L-l.M 



6S NEXT T 

69 RETURN 

73 LET M=M- (M>0) 

7A PRINT AT L.MJCHR* . 

75 RETURN 

100 REM MAIN LOOI 

200 LET G (A) =U 

210 GOSUB 5 

220 LET A- INT (RMD*1B)h 



230 LET U-QU 

235 GOSUB 5 

240 IF U>li THEN GOTO 491 

250 PRINT AT U.AICHR* 137 

260 GOSUB 3 



272 IF SO2000 THEN GOTO 2000 
275 PRINT AT H ( A> -2, 21 i CHR* 152 
ICHR* 132ITAB 21|CHR* 152|CHR« 1 



313 GOTO 200 

320 REM DRIPS/BLOCKS 

330 FOR N=U + 1 TO U + 3 
340 PRIMT AT N,ArCHR« 133 
350 GOSUB 5 
360 MEXT N 
370 LET CH-23 
3S0 LET GAP=33 
390 LET ORI=x*A*132*U*33 
400 FOR N- DRI TO X*33*A+Ht 
33 STEP 33 
4 10 GOSUB 5 
420 POKE N,CH 
430 POKE N-GAP.0 
440 NEXT N 

450 IF CH=23 THEN POKE N-33,. 
460 IF HIAX21 THEN LET H(A). 



470 IF PEEK (X+A*627: 



4B0 GOTO 200 

491 LET U=4 

492 LET CH-136 

493 LET GAP=99 

494 LET 0RI=X+A*297 

495 GOTO 400 

500 REM POINTS/BARGRAPH > 

505 GOSUB 5 

510 LET R*-CHR* (INT <RND*9>+29 

520 LET TM=TM+UAL R* 

530 GOSUB 5 

540 PRINT AT 13HMT (RND*3)*3,R 
NP*2B1R* 

550 GOSUB 5 

560 PRIMT AT 2,1," ( 24 inverse 

spacee ! » ( TO TM/4> 

570 IF TM<B4 THEN GOTO 200 

5B0 PRINT AT S, 1| -YOU MISSED TO 
O MANY- 

590 GOTO 950 

600 REM VARIOUS SUBROUTINES > 

610 IF MM9 THEN RETURN 

620 IF H(M>-13 THEN RETURN 
630 LET H(MJ=HlM)-3 
640 PRINT AT H(M),M|CHR« 3 
630 RETURN 

670 LET BP-INT (RND*9) 

671 POKE S, (28+BP) 

672 LET TM-TMtBP 
S00 LET Y=PEEK S 

810 IF Y=15 THEN GOTO 670 
S20 FOR T=4 TO STEP -1 
830 POKE S,T 
B40 NEXT T 

850 IF Y<28 OR Y>39 THEN GOTO 1 
000- (100 AND Y-21) 
860 LET SC-SC-MY-28HH0 



ZX81 CAME 



910 PRINT AT 11,23|EN!' 

920 IF EN>0 THEN RETURN 

530 PRINT AT 9, II "ENERGY RAN TO 
O LOW 

950 PRINT TAB 61 "GAME OVER"IJD 
1000 FOR T-l TO 11 

1010 PRINT AT L,M! "CRASH"|AT 14, 
241" '|AT L,M!" "(AT 14.Z4IC 
HRC 147 
1220 NEXT T 
1030 LET M-24 
1040 LET L-14 
1030 LET EN-EN-50 
1060 GOTO 910 

2000 PRINT AT 21,5) "AUTOREPAIRS" 
2P1P FOR N-l TO 15 STEP 2+RND*2 
2020 GOSUB 5 

2030 IF HfNIOZI THEN NEXT N 
2040 PRINT AT 18.NSCHR* 3jAT 15, 
NICHR* 3 

2050 LET H(N)-15 
2060 NEXT N 
2070 PRINT AT 21,0tP* 
2083 GOTO 200 

3000 REM SETTING-UP > 

3010 LET M=0 

3020 LET L-20 

3030 LET S-l 

3010 LET U-3 

3050 LET A=5 

3060 LET X-VAL "-32+PEEK 16396+2 

56*PEEK 16397" 

3070 DIM GI19) 

3080 DIM H(19> 

3090 FOR N-l TO 19 

4000 LET BIN) -3 

4010 LET H!NJ-15 

4020 NEXT N 

4030 LET EN-70 

4040 LET TM=5 

4050 LET SC-0 

4060 LET P*="32 a* graphic chara 

4070 PRINT * I III 1 1 1 1 1 1 1 U 1 1 1 1 1 1 I 



40B0 POKE 16418,0 
5000 FOR Y=0 TO 20 
5010 PRINT AT Y.211CHR* 142iCHI 

142ITAB 30ICHR* 142 
5020 NEXT Y 

5030 LET W«-"24x graphic on Uk 
7'tCHR* 128 



5035 REM * P* IN NEXT LINE 
* ALL IN INVERSE. 

5040 let p*« ■ i ;;:::::: 1 ::: : 



5050 PRINT AT 21,0! P*+P**P«[AT 
15, 1!W«! AT IS, HU* 
6000 GOSUB 63 
6010 GOSUB 64 

6020 PRINT AT L,M|" ■ I AT 2,24i"S 
CORE'IAT 5,231 "+*++++"JTAB 231"+ 
+ + + + + -JTA8 231'HtHf 
6025 REM * IN NEXT LINE ALL * 

# TEXT IS IN INVERSE. * 
6030 PRINT AT 9,22! " Bnorgy " [ TAB 
22! MevBl'lTflB 23IENJAT 23,61 "ma 

6040 LET L=20 

6050 LET M=9 

6060 GOSUB 64 

6070 GOTO 200 

7000 REM J. D.ROGERS/C.HOGG, 83 

7010 CLEAR 

7020 SAVE "MAD MINER" 

7030" PRINT "MOVEMENT KEYS ARE Z, 

C,N,M*,,,"F FIRES LASER', , "M ALS 

O MENDS FLOORS" 

7040 PRINT AT 18, 4! "PRESS ANY KE 

Y TO PLAY" 

7050 PAUSE 4E4 

7060 RAND 

7070 CLS 

■ :\C80 RUN 3000 



8000 REM 



INE "|L 

9020 LET X-16514+8*IL-1> 

9030 GOTO 9050 

9040 PRINT AT 21, 1! "ERROR, REDO" 

9050 INPUT U* 

9060 IF LEN U*<17 THEN GOTO 9040 

9070 LET C-0 

9080 FOR N=0 TO 15 STEP 2 

90B5 IF U*iN+l)>"F" THEN GOTO 

9040 
9090 POKE XtN/2, 16#C0DE USIN+11+ 
CODE US1N+21-476 
9100 LET C^CtPEEK IX+N/2) 
9200 NEXT N 
9300 IF C + LOVAL U»I17 TO ) THEN 

GOTO 9040 
9400 NEXT L 
9500 LIST 




80383137 £ 1 00 3 A 8 2 30 8 
403P28612A1C40E3627 
D1010A0009221C4035B 
2AI040230I0500C3364 
EDB023C1EI)B0CDA7143 



0E51D5CDi 



"•OEDl' 



■■■ ■ 



REM 170 char 
LET Z-USR If 


' cl ' r » °* r° 


320 




IFZ>1 TH6N 


30SUB 


i ■■■en 


GOSUB 3 






IF 2< >0 THEr 


GOTO 


90 


RETURN 






GOSUB 80 






IF SO 1700 T 


HEN GOSUB 80 



3E0DBA30603E01 32325 
B2403E0ABB01FFFF972 
3B03010100ED43B6508 
407A1 1CE01FE0E2B728 
0AI13102FE1 12803403 
1194022A0C4019CB325 
780100002803.0121211 
000922B3402AS3404S9 
3AB34077ED4B864089? 
097E22834032B540627 
FE7fi2HllF33EBS7710S: 
F1FE922B11FE9328115; 
0D01FF00C93E0032601 
B 2400 1 0000C 93E004 78 
32S340010100C9E1680 





TOP VALUE LIGHT PEN 

DRAGON 32/TANDY COLOUR 32K/SPECTRUM 48K 
THE NEW ADVANCED PROGRAM 

for the Trojan light pens include the fallowing facilities- 



* DRAW BOX 

■ DRAW CIRCLE 

- DRAW LINE 

■ DRAW PICTURES FREEHANI 

■ COLOUR FILL DESIGNATED ARE. 

- SAVE AND LOAD PICTURES 
TO AND FROM TAPE 

■ FULL ERASE FACILITIES 

All in Hi-Res screen in any of 4 colours 
lor the Dragon/Tandy. and S colours fo 
the Speclrum. 



TROJAN PRODUCTS 
166 Derlwyn, Dunvant, S' 

Tel; (0792) 2054°! 




* DATA ENTRV AND PRO( ESMNI, 

• MENU SELECTION AND CONTROL 
■ GAMES PLAYING 



Micro Computer Software & Accessories 



I.ARU-: from aoon COUI't TF.K DF.MFRS 



I ZX APPLICATIONS I 



Designs For 

Living 



Computer. 



Computer Aided Design — CAD — has 

come to the Spectrum. Colin Christmas 

reveals all . . . 






J ihe RD DIGITAL 






V5^ 



This is one of ma 
he TV screen. The li 



OiMii.i. Tracer. The Stan 

i;:nr, r>r.n :.r,i me Proi-ta 

if7B.Bn:i1hi!ni,-iirid.ff c re'- 






4oth B r5, in BASIC 




ws use loo each side of the tape. The 5th 

ter; "There's result by MERGING 2,3, and 4 

Irink than the with the main program. This will 

there's more only load on the 48 K Spectrum. 

a ZX81 than On side two, the 5th program is 



sfor 



2 ZX8! 



spend hundreds of pounds on a mapped code. 

camera to take holiday snaps? The ZX81 programs appear 

Surely the answer is, "Not if as 2 primed l.st.r.yi m Hie in- 

What makes sense in this with the kit Th.jy will run*-.'i ihn 

.:ssfiof the Speoi-i.m jrrlcran- 16K ZX8 1 using POKE and 



The Tracer itself consists of a 


be able to go a lot further. The And if the RD Digital Trace 


grid using the cursor keys and 


which extends the drawing arm 
with a floating pivot joint. This 


tended by adding BASIC soft- 
on. This way it is possible for 


and the cost frightens you off 


ner, then the cursor square can 
Straight lines can be drawn in 


length of 250cm and an angular 
range of to 110 Degrees. 9 

face with a 23 way edge con- 


for statistical analysis by using 

The only criticism of the 
manual concerns the kit for the 

Professional model uf Hie D.g r;il 

tions necessary tor the calibra 


48K Spectrum from Dream 
Software, as onBofs.vt.il.: ., 
grams now available wr.,,.-, will 
enable V . 11 '° begin '■•'■' ■ 

you can afford. 

Designed to be user •• endly 


1 6 directions, 26 'User Points' 
;a-i h.' assigned anywhere on 

ony where on the screen. And so 


calibrated withV gnd' Alt* 


P^pe^'in^e'manualiKnd 


Dream's package (Manual ana 


gra'bbeTby M^ShS *SS 


piellTwh'chMs^'as'weli 






friendly indeed. It takes only a 


The action of the Tracer Arm 


descriPtTonrare''kept a short a so 


shortwhile to learn the27 com- 
mands, and before you know it 


the initial thrill of transfering 


does' t he " ac U ha" ra piuHtow i ng 


through" "e m7n e usT IClll d 


almost, you are engrossed in the 


outlines from caper to grid, 
for every next step. 


All movements in tact have lobe 


familiarise yourself with the pro- 
gram. 


hitherto remote world of Com- 
puter Aided Design. 


Border, Ink and Papercolours 














dumpe , d S 1 C tape O We C d O is J c , ove.ed 


circles, straight lines, rec- 






C.A.D, by keying LOAD "" 






CODE 16384,6912. The 


angles and so on, cm all be 






potential for designing own title 


simply and rapidly constructed 






by having to only define two 








points with the tracing heads. 














stuff. And that's the point. It's 




1 fT^,& 


~) 1 


getting difficult to keep up with 




S l 


them. Most start with Graph 






p:i;i';r.desiy.i:ng screens, devis- 


ink colour. There are two "haT 


\ ' ^£- 


5>1 


ing their own UDG's. Many have 
already discovered the disad- 












10 by ID grid and companies 
erenow producing PIXELPADS. 


mat, INVERSE or FlASHinq. 






These are large sheets of 


Screens can then be saved on 






n ranhi r a !rt* "t ho lT !f' ", ^ ", l'" ' 



msidewsi'^Mflages'scated 






27 Com 


nands and the manua 


tional progra 


mming information 
















'Sit i.,-.ed upside down or 


expensive. With no 




d- that!). T 


e only way to do an 


the facility t 


eMhe k gr'a B 'h' arV " 1 


Bse As one might expect, the 


Pe.spective S ana'on 






ough a few of then- 


DATA state 


ry long ago, pape 


a;v sailer. Similarly scale 


fice, the Tracer wil 
One of the are 


-■" Ml.. F.L 


f- There 

* design! 


are 5 options fo 

- User Defined Blocks 
s. 40 can be con 


styluses an 
sidered it a 


papyrus. 1 don't 

dramatic develop 



d, each UDB being 24 by means i 



screen images at different seal- techniques of Cor.., 

inris ami positions. Finally it .:; Design. A'.yone : i ■..,■■ ;i im- 
possible to create unique fessiona My with Electron! 



programming knowledge. 



ith the 


parallelograms rectangles 




It tip pens joined 




squares, triangles, can all be 






K. 


3 D cubes and cuboids can be 


by the pre 


the facilities enjoyed 






















Ola pi ,::. 












...,„- 




downwit 


our compute^ 65 ' 1 




•igel Salt 



/ A> 



GRAPHIC 
DESIGN TOO 
for SPECTRUM (481 



24 x 24 GRID FOR H.R. GRAPHIC DESIGN. 200 CH. STORE. VIEW"* AND EDIT 

UP TO 9 CH. — CHOICE OF 9 FORMATS — ROTATE — MIRROR (HOR. OR 

VERT.) - MENU DRIVEN - KEYBOARDfJOYSTICK CONTROL — TOOLKIT 

INCLUDED TO USE U.D.G IN YOUR OWN PROGRAMME 



ZX81 UTILITY 



Machine Code 
Plotter 

Simon A Rapley has been plotting in 

Lincolnshire and sends the outcome to 

us. 



display. This pro! 
savings in all t 
aspects 



Line 20 adds 1 to that a- 

Line 30 POKEs the decim 
code (1281 for an invars 

b PRINTectc 
An emended BASIC pn 



odeisPOKEdinl 
iition. Finally, if 



e pingram, in that a 



the ZX81 keeps a record of its 

display in a siring of 792 bytes. 
every 33rd byte carrying the 



POKEd into any of the 32 bytes 
preceeding any NEWLINE code, 



is of ZXB1 BASIC, and 



and can be Pound in memory by 
referring to the system variable 
D.HLtl*id in addresses 16396 
and 16397 1400C and 400D in 



stored differently to ma 
space available for the p 
Can you see why the pn 



SX81 display 














1 














The DATA needed tc 
inverse space here is 
The end of DATA a 



1© LET X=PEETK 16396 +256*PEEK 1 



6397 

SO LET X=X + 1 

30 poke x, iee 





j'sTART^ 










™»" 


—~ 


~] 


1 






— 










,r.;""t 




<rv>> 


I DATA ( 


1 












(finish) 


l :i .- i " L '-.' "■■ 








1 










1 




PlWrVosmon 

















ZX81 UTILITY 



LD HL, LENGTH 

ADD HL.BC 

PUSH HL 

POP HL 

LD A, (HL) 

SUB A, 67 

RET Z 

LD A, (HL) 

INC HL 

LD B, (HL) 

INC HL 

LD C, (HL) 

INC HL 

PUSH HL 

LD HL,D.FILE 



5F 




LD E, (HL> 


23 




INC HL 


!Sb 




LD D, (HL) 


60 




LD H, B 


69 




LD L, C 


19 




LD (HL),A 


1SEB 


JR -24 


070 


2FB40 


30 DATA 


050 


50830 


51B2017IB10172B50 


030 


32B50 


52B50173B30 174050 


050 


54050 


75070134840135050 


l-:50 


56S20 


76B101 77850136850 


850 


7B030 


37830179040138050 


010 


7A050 


3B05015C82017D830 


850 


3DB50 


5E850 1 7FB30 1 80050 


050 


60050 


B 1 070 1 40050 1 6 1 B20 


840 


41810 


83850 1 42850163850 


870 


43050164020195010144040 


26(3 


B2330 


B3290 1 B42B0 1B6370 


2E0 


BB2A0 1 B9330 1 BA290 1 BB3 1 


3 LB 


8D350 


BF3701C03401C12C0 


370 


C3260 


C4320 1 C5320 1 C62E0 


330 


CS2C0 


C9 END OF DATA 


43 




POINTER 


5 




END OF INPUT 



IL 




L 



" l n, a p., h« i ., ir„ n» 

■.. a„ l. h., a., j. s. a 






9 Out of 1( 
said the) 
Ar< 




at games, great utilities all for only 
£5.99. Available rorSpectrum, Atari Wc 
20, BBC B, arvJCBM 64 through W.M. 
Smith, Menzles and computer stores. 

Really use your computer this summer. 
Clever Clogs 

8 great Tun games for whBzWds. Change 
the difficulty with data pachs on Science, 
The Arts ft General Knowledge. 



5p«trumat£6.95. 



Recently launched, the new name In 
ouaHty strategy and adventure games. Toj 
writers and programmers open the door tc 
the wortd of Imagination and fantasy 



5tar force Seven, Quest for eternity, and 



Nave a holiday at home and save 
Ovlllsauon. Available for Atafl. BBC B, 
5pectrum ft Commodore 64. 



iomputers 
referred 



Software 




The Game Lords join the Argus Press team. Consistently In the top 
ten with great games like Ant Attack, Boogaboo, Tred, Mined Out 
and Snowman. Prices from£4.95to£7.95. Available from W.M. 
Smith, Soots and Menzies and leading Computer Stores worldwide. 



*Wh«i askod to eipress a prefweree 



■HARDWARE REVIEW 



a 'eons muttering "Extei 



Talkback: 
Speech units 








the box. The DCP speech unit you have to break the ward into 


„, w ,„ iIC „, 




each aliophone, pause of gap in 




its component syllables and 






speech las at the end of worts 


Hum, and fits straight onto the 


reconstruct it in Currah 






and sentences) Is turned Into a 


output port. 


language. "Hello", for instance. 






number and then given a code 




is spoken by using LET 


The two DIN sockets allow 




The code is then incorporated 




SS = "HE(LU 100)" And of 






within 3 very simple program us 








—J 


ing OUT Instruction to 7, 


The chip that comes with the 


formation end inflexion to the 


[£49.00-t-VAT) to one, and 


L_ i 


An instruction booklet is 


unit contains the alphabet plus 


speech, all of which make It a 




r- J 




numbers from 1 to 20, and also 




Music Synthesiser and 16 line 




the allophonas with everyday 






control port (£ 1 9.50 Kit, 25,00 










built, + VATI, or output to an 


■ 




struct anv number you wish. 


deel of time and effort per- 


amplifier to the other. The mini 


j 




The other three chips con- 




jack is an input from the Spec- 


* 






to adopt their unit for producing 


trum's ear socket to amplify Its 




flow, gallon, high, inches, kilo. 


speech in their games, and this is 












Compatible with BOTH 


ere 






purchasing such a unit. Most 


ZXB1 end Spectrum, it is at 


followed by (our more short 


total of about 280 words. Using 


games also tend to use the 




)ur 


lines and BUN. ft talks 


the unit is very simple and it does 




similar to that on the ZX printer. 


There are several bonuses 


add a new dimension to your 


standard, and the two units can- 


this means that though the pen 


cki 




the one word you want won't be 


f;|ifHZ 


is OK for ZX8 1 peripherals, very 
<ew Spectrum units will fit on 




Sy^tVgreat'fun ™d oftBii 


The unit itself costs 


Speech is achieved by us- 






£29.95 and if you were to buy 








use. Secondly, it teaches the 


the unit and all the chips it will 








user a lot about the structure o 


cost you nearly £70. need 1 say 


to the Spectrum's port wrtic- 




value 




more? 


will allow two (or morel un.ts i:> 


^■^ a ™rL 8 trJ«h! but add! 






Cllve Smith 








respect this system could we 
find a place in classrooms. One 






thai the flexfbHty is infinite. 


Telped. 




C ° U, After all this how does it 


given in the 5 page booklet 


abit of 


■ CURRAH MICRO- 






1 SPEECH UNIT 


perform? 


which is brief but reasonably 


"ft 3 ™ 


teachers; the unit will sa< 


■ currah computer 


oint T d at first™' oidnTseem to 


perleneed user. To allow for con- 






1 Components Ltd. 








Icraythorp ind. Est. 


demo tape seemed indistinct 




mmlng 


our micros to sing "Daisy 


■ Hartlepool, 


clearly at all, a bit of very careful 


unfortunately not how the 
INPUT /OUTPUT socket is wired 






■ Cleveland. 








Colin Christmas 


| Price £29.95 


unit improved this slightly. 


To actually produce speech you 








Th t fth mosl asi- 








5-PACK 








DCP Micro 


ly ob^nable, as many shops in- 


them to port 1 27 using OUT 



developments 
2 station Close 
Longwood 
Norwich 
NR13 OAX 
Price E29.95 



larkat today the DCP S 

obs it use alio phones. 



peripherals which stand upright, ingly. 

It is sold complete with a well I must now admit that I fine 



it the Recommend 



The 



i by f 



3rd a r 



spoken and then changed into a 
digital form, they can be recalled 
by the user by simply using an 
OUT statement, ie: OUT 255, 
34. The advantage ef this is that 

sound unlike the allophone 

You can buy another 3 






of using the OUT instruc- 
r. Micro Speech reserves 



CHATTERBOX II 

William Stuart 
Systems 
□uarley Down 
House 
Cholderton 
Nr. Salisbury 
Wiltshire SP4 ODZ 
Price £39.00 + vat 



clear and recognisable, 
pleasure if you like tinkering, 

has to be fully understood to get 

loudspeaker is open at the front 
damaged — surely it would not 



Although the system is 
jre related to English words, Chatterbox II is quite a large ur 
get the correct pronunciation - 10xl5»6 cms - and 





F"LBtl THE ERNIE 



<K 



ULTIMATE PLAY THE GAME 

THE GREEN, ASHBY DE LA ZOUCH, LEICESTERSHIRE LE6 S] 



PJS- 



sv 



SINCLAIR NEWS 



news 





(or the 48K Spectrum and priced at £7.95. 

Wall packaged in library cases LOOK SHARP contains two 
programs from the highly res pec led Widget Software firm and 
aimed at the 37 and 6+ age ranges. 

COUNT WITH OLIVER is a series of early learning maths exer- 


• Cloud 9 Software, 4 Dolv in Rd.. Tavistock, Devon, PL1 9 9EA 

specialise .n Chemistry programs and have added REACTIONSto 

5ion model and revision notes are included for £8.50, 


• Homestudy produce two sets of programs for 'O' Level revi- 
sion. Physics and Mathematics Itwo separate syllabus sets) are 

- ■■ covered in twin cassette packages for £22.00 and 
E30.00 respectively. 

• Expensive, but so sure of the value of their programs are they, 

more from Treleigh Woods, Treleigh, Redruth, Cornwall. 


• S.D. Micro-systems, PO Bo* 24, Hitchin, Herts. SG4 OAE 

re-=.isr- CALORIE CONTROLLER If 5.95) and PERSONAL FILING 

SYSTEM (£6.951 for the 48K Spectrum. If you are interested in 

■cue Business type programs then contact them for a 


■ fgwler Software, Hendon Mill, Nelson, Lancashire have 
reduced the price of their 48KSpectr urn CARTOON ANIMATION 
program from £10.00 to £5.00. 


• GARDEN BIRDS, a program from E H Harbard, The Old 
Customs House, Sheriffs Brae, Banifl. for the 48K Spectrum is 
not recommended to Ornithologists! - Who says' Mr. Harbard 
himself, 

become interested in birds - I'm sure there's a joke there 



ay that the progr: 
HOTLINE couli 



program its name. The 



Old buffer 

— new venture 



Teaching 
without tears 




■ usir: r.-omnnsingaidonthB 

- for the 48K Spectrum, 

" 'luying a sound 

spired by the Quid" 






risual rewards. All four c 
:ost £9,25. 

Latest in the range is 



'""► 



SINCLAIR NEWS 







■injlne 



d perfectly lor the Meow Micros 

lad it. Although the 8 Newnham Close 

i still needed la be Braintree 

.asionally on some Essen CM7 7PR 

signal tone and Cost C24. 95 (£27.95 ZX81 ) 




EgI EESsa 



in Brief — Arcade 



SUPERCODE « 



i nil -' 



is the i 



1 OU 



ver seen and includes all Ltie usual Renumber type prngNimminy 
ids plus 35 screen routines. 
Suitable for both 1 6K and 48K Spectrums. the only problem 

AIRBASE INW B .srcade gamel'vesee 



■ C.h.ir; 



h CND flag - around Greenha 
lus other thinly disguised pub 



the only one who is impervious is the "Iron Lady". 

• Avalon Software, 62 Albion St Mansfield, Noti 

OMADAN ATTACK is a space battle type game 



• Carne 1 1 Softwares! 

Shadows" i 



:d the Wrath of Maora 



oil! Cost will beC12. 50. 

• Salamander Software finally got Jeff Minter's MATRI> 
METAGALACTIC LLAMAS BATTLE ATTHE EDGE OFTIME in 



le for CI 4.95. 1 7 Norfolk Rd„ Brighton, E. 



g FROG SHOOTERS, an arcade game from the 
liable at £6.95. 

"Just one more go - I KNOW I can do better" 
e and ZIG Z AG, a 3D perspective maze game with 



l THE REVENGE OF THE K 



E5.95 from 4 NW Arcade, Birmingham, B2 5LH. 

• DISCO DAN will lead you a dance if Gem Software I 
to do with it. Unusual and worth a look, lis across Iikv 
jump and Q' Bert. 

• Only two ZX81 tapes this time, surely the suppliers 



Bits and nieces 



imself said il is a novel 



Onlv time and the eventual available 
nodified version will tell, mean- 

vhile I wonder if the Spectrum is nc A ai»m«i mu *j 

ibout to be neglected in the USfl Abandoned 



company di 



i! Still, unhelpful. P 



Printer poleaxed 



Sinclair 
Software 
for the 
Spectrum 



Micronet Pishing 

The Micrnnet 800 syster 



• IK ZX81GAMES is supplied by lain Thompson of 25 Walih 
Dm,.:-. Holywell. Whitley Bey. Tyne and Wear NE2E i ONL It co 
with an instruction sheet and cost C3.95. 

• And tor the 1 6K use- FLIGHT is a flight simulation from J. Pa, 
2 The Avenue. Fallings Park. Wolverhampton WV10 ORG 




'■The ing pinball and fruit mach.r. 
■i !■■-■ 



I weit to be discovere 
lims to find them b 
way the rubble wit 

the deadly 'Floaters 



each. inc. VAT, am 

available from Sin'cl 
Limited, Stanhc 



nVf'he Tax-calculator 
o S .op Software 



he task greatly simpl 
Specially written ti 



I HARDWARE NEWS 1 




AtthelastZXMicrofairl 
sk drive interfaces work 1 1 
P2L or Primordial Periph 



RAM. Priced at armmd £85.00 1 have asked them lo senc 

alB9 Heme Rd Bushey. Herts. WfJ2 3LP. 

Res. Ltd. is 31 Unit 18. Central Trading Est Staines 

t, TW1B4XE 



mal, plain (if not downright ugly) m 



i of the casing. At £69.95 it 
:arege media is often neglected. 



g Ltd. Sutherland H 



Cost £27.95. 

ce units have recently made their deBut: 
Lo Profile from Advanced Memory Syster 
Technology Centre, Green Lane, Appleton, Wat 
■ £49.95 uses a new idea in keys by having tr 
jber bubble instead o( the normal spring s 1 
keypad and space bar Is built in. and there are a 



'oking Computet Centre, 32. Chertse 
a slimline keyboard with 28 special fu 

DK'Tronics also have a new veision of 
.rket, hopefully remedying the design pre 



Ricoll maki 

last forever. N 



• DK'Tronicsht 



intain a space bar and will pro 
widely available at around £39.96. 



Priced at E 2 2. 95 and El 9. 9 5 respectively these units loo* 

good developments and additions to your Spectrum. 

• For those interested in CAD (Computer Aided Design) British 
Micro. 0923 48222 have a unit called Gralpd which looks ■■'- - 

■ ■ ■ .,.!■■■■■■■■ 

id enthusiasts only as it's priced at £143.75 inc. VAT - 






from under £5.00, their slc-ga 


You're never too 




young 






DCH software 


November 1983 to create ant 


Centre, 10 North 


St., Ashford, Kent 






ture software, primarily ror [he 








In early April 1 9B4 the Com 




Andre* Gretn, 'a "l l^elf o°d 


well a's h ln Im^essfve'^io 












home computers, printers dis 


Andrew's first programs 


monitors and all sort s™ add" 8 5 


launched by Malan *ere "Gold 
Blast", a 48K Spectrum arcade 




game £5.75 and "Character 






educational projects where a 



enlargement b 






















Code and 'Parents and th 




























lenge" £4.95 








h 'We'a>n Ihe t ■ P " > . |eCt ' jj talM 


12thZXMicrof 


































sound effects o 


Tab*ng Un he S 





fou can buy a pack of ten far £ 1 .25 to convert a tew 



g Newtech Developments. Stockwide Ltd. ti 



Introducing the Challenge Sprint 




It loads Spectrums four times faster 
than an ordinary cassette player, 
uses standard cassette software, 

and has improved loading reliability. 

ssess.. w Ml for j ust £6435. ^i=a~ .. 



TRADE ENQUIRIES WELCOME 



-3*§l 



CHALLENGE RESEARCH |-~- 

A DIVISION OF A.E HEADENLTD I 







Z< COMPUTING AUGUST/SEPTEMBER 



■SPECTRUM PROGRAM! 



Telepathy 

Keep your mind clean, you never know who is 
tuning inl Chris H. Sinclair of North Humberside helps 
to test your ability. 



Parapsychology is now a grow- tu. prnnnm 

mg area of 'respectable' resear- ' ,KS rr "Biani 

ch. Investigations in this field in- User defined graphics a 

elude research into Telepathy In printing the 'star' a 

andPrecognitionandtoaidsuch 'wavy lines' cards The i 

investigations. Dr J.B. Rhine the graphics is held i 



A pack consists nf 25 cards, 



is randomly 
andthesubj 



i graphics. The 



s 310-410 foFm 
sloop. Unas 320 



has been betwean 1 and5 Andlin B s340 
-■■ — "■.=.=.. .t was fo.p-o 370 get a keypress between 1 

Subjects can Bubootttcfoutit than com* I ''.s inowwd bv 



1 REM **.******#****-##*******# 

♦GRAPHICS mode. * 
*****♦**##*#*♦*******## 
30 REM SET UP USER GRAPHICS 
50 RESTORE 
60 FDR A=144 TO 159: 
•?0 FOR b=0 TO 7: READ c: POKE 
USR CHR* A*b,c: NEXT b 
80 NEXT a 
100 REM INSTRUCTIONS 

110 border 0: paper a: ink 4: c 




■SPECTRUM PROGRAM! 



,3("PRESS AMY KEY TO CONTINUE" 

163 BEEP .05,24 

17B PAUSE 

180 GO SUB 4000 

190 LET CORRECT=0: LET NO=0: LE 
T BUESB-ZI LET TRIES=100: LET CO 
-0: LET PRINTNUMBER=0 

300 REM MAIN GUESS LOOP STARTS 

HERE 

310 FOR R-l TO TRIES 

320 LET NO-INT <RND#10> 

330 IF NO>3 OR N0<1 THEN GO TO 

37.0 

340 LET GS-INKEY*: IF INKEY5-"" 

THEN GO TQ 340 

330 IF G*>"0" AND 6*<"fi" THEN 
GO TO 370 

360 GO TO 340: REM ERROR IN I 

NPUT 

370 LET GUES5=UAL G*: BEEP .02, 
12! REM INPUT O.K. 

380 IF NO=GUESS THEN LET COP.RE 



IRDER 0: PAPER 



550 OVER 1 

560 LET PRINTNUMBER=tPEI 
J-INT (PERCENT/10): LET I 
BER=PRINTNUMEER*10 

5^0 LET CO-14: GO SUB 31 

330 LET PRINTNLI['!BER=INT 

5"P LET C0 = 4! GO SUB 30! 



=50 GO 'O i; 

T-.PS0 REM PRII 

3010 INK 3: I 

3920 GO TO t; 



: PEN ERROR 
PERCENTAGES 





m 












a 




* I 


■ 












■ 






■ 












■ 






■ 












■ " 


R 




■ ■ 




ETU 














610 PAPER 1 : INK 7: OVE 

6?9 LET R*=INKEY*: IF F 
N GO TO 620 

630 IF R«="Y" OR R*="y 
TO 110 

640 IF R*="N"OR R*="n" 


THEN G 
rHEN STOP 




PR IN 


r AT 


7, CO 


■ 
■ 

■ 
■ 


RETURN 




/X COMPUTING AU&SEPT 1984 














43 



4140 PLOT 127, 152 

4150 BEEP .05,12 

4200 REM DRAW CIRCLE CARD 

4210 FOR a=l TO S: PRINT 

I " ": NEXT a 

4220 INK 2! PLOT 184,168: 

8,0: DRAW 0,-65; DRAW -48 

W 0,65 

4230 INK 0: FOR a-12 TO 1 

LE 207, 136, a: NEXT a 

4243 BEEP .05, 12 

4300 REM DRAU CROSS CARD 



a = 12 TO 



64,80: DRAW 43, 
>RAW -48, 0T DRAW 



15, 9| ■« 



i" i AT 



4400 REM DRAW SQUARE CARD 
4410 FOR a=12 TO 19: PRINT AT a 
ls ' " ■': NEXT a 

4420 INK 2: PLOT 144,80: DRAW 48 
I DRAW 0,-65: DRAW -48,0; DRAW 



0,63 

1430 : 



0: PRINT 



IENER CARDS 5UBROU 



PEI- 


DRAW CURVES 


CARD 


BORDER 7: PAPER 




PAPER 


6: FOR a= 




a. ~> 








INK 


'A 


PLOT 24, 1 


68: DRAW 48 


kMW 


* 


-65: DRAW 


-48,0: DRAW 


INK 


S3. 


PRINT AT 


2,4i "MHO" (A 






tAT 4,5[ "S 




(HI 


*>, 


4! "Bat!") AT 


7,5i "BEE" 



.05, : 

I REM DRAW STAR CARD 

1 POR a=l TO 8: PRINT AT a 13 
"■ NEXT a 
INK 2: PLOT 104,168: DRAW 4 
DRAW 0,-65: DRAW -48,0; DRA 



4440 BEEP .05,12 

4450 PAPER ?: INK 0: PRINT AT 10 

,5!M";AT 10,1S!'2-!AT tjB,2S|"3" 

iAT 21,10; »4"jAT 21,201 "S- 

4460 RETURN 

5000 REM DATA FOR STAR GRAPHICS 

5010 DATA 1,1,1,3,3,3,2,4 

5020 DATA 184,240,224,192,128,0, 

5030 DATA 2.9, IS, 7, 3, 1,0,0,0 



,59 
50 7( 



50B0 DATA 12, 12, 24, 24^248, 240,0, 

5090 DATA 4B,4B,24,24, 31, 15,0,1 
5100 DATA 0,0,0,0, 254, 252, U2, 19 

5110 DATA 1,3,3,3,6,6,6,12 

5120 DATA 128,192,192,192 96 96 

96,48 

5200 REM DATA FDR CURVE GRAPHICS 

5210 DATA 96,96,48,48,24,12 6 3 

5220 DATA 3,6.12,24,48,48 96 °6 

5230 DATA 6,6,12,12 24 48 96'l92 






WRITTEN AND APPROVED BY TEACHERS 

TESTED IN SCHOOLS 
FREE REVISIONNOTES! 




Helps you pass your 0' Levels 



Played space invaders too long? Come down lo 
earth with Srisoft. 



i i.'-.i 



Scknre 
Maihs Plus 



- £7 95 OiMilsuy 
Biology 
Computer Studies - 1 



SEND FOR FREE CATALOGUE NOW - INCLUDES 
MANY SPECIAL OFFERS! 



The Complete Printed Circuit Workshop 

l-THAl-l-MF-"^^''"'-^!* 



lit Workshop 

a «^ 



Micro Interface Kit 



9wavDoutpulpl<jrj» 



ZX81 Hi Resolution Graphics Kit 



ZX/Spectrum Intelligent Joystick l/F 



Computer Cables & Connectors 




HB.'2069 C8.B5- 



complete P. C.B. workshop H *" *' 



ZX80 CAME 



streets of 
London 



High priest of the ZX80, Mike Hyams, 

calls on his followers to solve this 
classic adventure. | 





of High Wycombe British 
Station, nearly a fate worse 

in live in High Wycombe!! 



ave to find in 01 
e places. Note 
ord YET may t 



16O LETT R* = TU*(RS 
1TO IF NOT H*=" - ■ 
ISO PRINT 

1S5 IF Bt="5TOP" 



THEN GO TO 
THEN CO TO ( 



ISO INPUT Z* 
1Q3 LETT BS = C$ 
135 LETT MO=0 



MO=l 



215 IF Z* 

aao IF Z*: 

22S IF Z$: 

TO%;£ »»" T - "*"»' 



THEN I 

THEN LET MO=2 

THEN LET MO=3 

THEN LET MO = 4- 

THEN LET MO=5 

THEN LET MO=6 

T " THEN GC 



f "TIME 



1H GQ TO ssoo 

40 LET CPRRY=C 

50 DIM R( 16) 
BO LET 5ET1=0 

51 LET 5ETS=0 
T5 LET CH&H- lO 
SO LET T3=8 

65 LET T3=5~? 

SO LET N=53 

lOl LET T3=T3+3 

lOa IF T3>59 THEN LET T2=T2+ 1 
JOS IF T3>5S THEN LET T3=T3-60 i 
1 THEN <"- H 



;T3; - : ■ j 

^33 IF T3<10 THEN PRINT "O"; 
233 PRINT T3 

PRINT , . , , *i 



16 PNO To 



IF T2> 

TO 9SZ3 

1GS LETT IT=0 

JS2 SS SUB S990+NX10 

lOQ PRINT "YOU RRE " : 

120 LET B=CODE(R«3 ' 

J2g J F B =0 THEN GO TO 150 

JSt IE g =a SS THEN PRINT 

135 IF B=S23 THEN GO TO 16. 



ISO PRINT 


CHR$(EO ; 






■s Mn^ 


fewmr 


int 


8SK ^P 


JIpH 






IWdd|||M| -tj- 


_>JnMj3, 


Ti 5 -HI 





23A _. 
ONEY £-;CR5H 
==» XT X«s=-B" THEN GO TO 6GOC> 
2*0 *F Z«="H" THEN GO TO ©OOO 
24.3 IF Z*="Q- THEN GO TO <3SSO 
24-5 IF Zi=-I" THEN GO TO 7000 
250 IF MO=0 THEN GO TO 190 
255 FOR 2= 1 TO MO 

250 LET TURN= (CQDEtBt) -2E) HO 
2ZO LET B*=TLSIB*> 

2SO LET TURNtTURN4-OXE(B*) -2B 
2S5 LET B$=TL*<B*I 
E90 NEXT ~ 
300 IF Tl 
O TO 400 
320 LET N=TURH 
335 CL3 
330 GO TO lOO 

■iGG PRINT '■ YOIJ CRNNOT GO T: 
=tV "; 
dlS PRINT"" 199 THEN PRINT 
42© GO TO 190 
OOOO PRI|- 



>5 THEN PRINT 








l-ETT MON 






















7620 
































6030 


IF CR5H-MQN c O THEN GO TO 6 J 


"7630 


LET R*= 








7635 


LET MON 


4 




SOSQ 


PRINT R* 


T633 


RETURN 








LET CRRRY-CRRRY+1 






































































BIOS 


CL5 


"7S60 


LET R* = 





"YOU 
B230 PRINT R* 

easo so to eioo- 

5300 PRINT "YOU DO NOT HOVE ENOU 



6310 PRINT R* 

532Q GO TO 6100 

7000 CL5 

TOIO PRINT -YOU RRE CARRYING . . . " 

70SO PRINT 

T-:-23 IF CRRRY=Q THEN PRINT "NOTf- 
ING" 

7027 IF CORRYeO THEN GO TO S1SO 

7033 FOR Z= 3 TO 16 

:70d0 IF RiZ>=0 THEN GO TO 7046 

7c-iia go sue 7soo*ziio 

704-5 PRINT R$ 
705CONEXT Z 



PRIR OF SHOES" 
75SS LET M0N=20 

7529 RETURN 

7530 LET R*=-R CINEMR TICKET" 
7535 LET MON=3 

7539 RETURN 

73AO LET ft*="RN RUTHORI5RTION LE 

TTER TO BRORDCftST" 



7555 LET MONa5 

7553 RETURN 

75&0 LET Rt="R LIFT TICKET" 

75B3 LET MON-2 



rts/ia LET MOV= = 

7579 RETURN 

7SOO LET R*=-5QME PRPER HONKIE5" 



ET- 

7665 LET MON=6 

"766Q RETURN 

aooo ci_5 

aoao PRINT 
eoeo print 

S030 PRINT 

ado print 

S045 PRINT 

3050 PRINT 

B060 PRINT 

BOSS PRINT 

8070 PRINT 

5070 PRINT 

eoeo print 

S090 PRINT 



7585 LET MON= 
7589 RETURN 
LET R*: 



R BLfiNK COMPUTER 



I LET R*="RN OLD BOOK" 

! LET MON=l 

1 RETURN 

7510 LET fW = "SOME BIR05EZD" 



T IME " 

MONEY LEFT" 

BUY" 



S105 PRINT 

BllO PRINT 

611S PRINT , "H. . .HELP" 

81PO PRINT 

S330 PRINT -PRESS NEWSLINE TO CO 

NTINUE" 

QIAO INPUT Z* 

Bl-15 CLS 

5150 GO TO lOO 



"YOUR MISSION IS COMP 



S500 PRINT 
BSIO PRINT 
LETED" 

S520 PRINT 

S530 PRINT "LOOK OUT FOR MORE EX 

CITING" , "ZX-SO GRMES" ...... "ONLY I 

N >2X COMPUTING!- " 

S3S3 5TOP 

9000 LET R*="HM 5GD DCF^>9QD QN9'_J 
ISN SGD MNQ5G SOD ON9C «GHR90X93 
R HMSN SGO CHRS9MBD" 

9001 LET B*="4-303" 
QOC-9 RETURN 

9010 LET R«="95 GXCO Q9QJ BNQMDQ 
I5GDOO HR 9 L9M RS9MCHMF NM g:[»i 
U 59KJHMF 9 KN9C NE QTRRHRG" 
9&I) LET B$ - " O lC^aOAKXK.Gi " 
SOJ.9 RETURN 

9020 LET R*="HM GXCO Q90JISGCGO 
9QD EHDKCR 9MC &QDDR »?*E90 OR & 
GO DXD B9M RDO" 

9021 LET B*= "03030303" 

9029 RETURN 

9030 LET FI$i"HM NWETJQC R5QDD5I5G 
, DOD HR 9 K9QFO QDBNOC RGNOlMDQQH 



ZXSO CAME 



" 00050SOS003S " 



9142 IF R(6) = 
000099 " 
310.5 LET IT = E 
9 3 4.3 RETURN 

9150 LET R4 = ■' 
M^DORSGDOD HR 
9KD- 

9151 LET Bt-"0015" 
9155 LET IT = ~7 
9153 RETURN 
9J60 LET F»S = "HM NWENQC RSODOSISf 

SGD D9R5 5GD BOMSQD ONHMSlSIWDG 
RS9MCR GHFG 9RNUD SGDlRGNOR" 

■3 16 1 LET B* = " 15003SO&" 

3 369 RETURN 

9 1TO LET R$="HM SGD EMXDGJ NE 5GC 

IDLOHQD BHMDLgxSGOQD MR S EHKL S 

QITYJSLET P,4="KM SGO ENXQQ NE SGt 

iDLOHQD BHr-TDL9*SGOQD Hfi 9 EHKL = 

RNTS SN R59Q515GD RVDOS BNTMSDQ 

HP RDKKHMFIG9M,JHDR- 

9171 LET B$=' , OC190.>'.'<M«" 

A17a IF R(3t=0 THEN LET E£="001^ 



SNOD SOD Q96JR 9QD ETKK NElQmj 
EKNXCR +5GD W9KK+- " 

90A1 LET B«="OA" 
904-5 LET IT= 1 
904-S RETURN 

9050 LET R*="HM fAJEffllrC R5QODS 95 
3JK9CFD eONRRONSCRlSGDOD 9QD RG 

ND RGNOR 9KK NUOOI5GD OK9BD" 
3051 LET B$- " 0&S5 1704<»36' 
9055 LET IT = 2 

9059 RETURN 

9060 LET fi-$="HM OHBSgOfriKX BHQBT 
RiSGDOD HR 9 fiNLJ NEEH6D RDKKHMFt 
SHBOD5R ENO SGD BHMDL9" 

9051 LET B$=-4SC'019" 
9065 LET IT=3 

9069 RETURN 

9070 LET R*="HM TOODO OOFDM5 RSG? 
D0515GD ONR5 NEEHBD 5NVDO KINNLRl 
SRNUO SGD RTMKCHMFR" 
9073 LET B»="OSOQOO*e" 
=<OTQ RETURN 

90M LET R*= '■IMTSRHGD SGO K9HFGBL 
xGNSDKxSGOQD HR ' 9M rJKC RTHKCMMFl 
WOONRHSO XNT OTS H5 KNMJR UDBXlP 
NOHMF" 

9061 LET B$;MOOB14- 
9069 RETURN 

9090 LET R$:"NT5RHCf> SGD RRB GPi 
E9LNTR ODNOKD ODDO OQRRHMFlSGDNT 
FG SGD CNNQR 9MC HFWNQHMFIXNT" 

9091 LET B*.-000911- 

9099 RETURN 

9100 LET R«=-HM SGD ODBDOSMNM NE 
ISGO RRBXQ9CHN O FDM5KX CQHE5R E 
QNL 9XROD9JDQ" 

9101 LET B$="0O0OOOl«' 
91C2BIF" 5ET2-0 THEN LET R$= U HH 5 
GO QDBDOSHNM NElSGD RftBl9 RL9Q5K 
X CQOPROC L9M G9MCR XNT 9M OMUDK 
NOD" 

9103 IK 3ET2=e> THEM LET CfiBRY=CS 

RRYtl 

9104 LET RId)=l 
91C5 LET SETS=1 
9109 RETURN 

91 lO LET FrS="HM SGO B9QH59K Q9CM 
N*ENXDQXSGOQD HR 9 RGNO RDKKHMF 

3113 |-ET B* : "0013- gtgte RETURN 

9 1 3 1> Lt [ J. 1 - _j QRrr T r F~T R*t 

-11? ^TURN 9339 GOToW 

9a4 1 LET B«= "342730170037" 
924-9 GO TO 9222 

9191 LET B*="12a30022" ' ^flrf-^"^^ ^^S^ HSP^S" 

9199 RETURN 5f -* ! "' s=rtjD HNT5G XNT B9M ROD 5GD> 

91SO LET P*S="NT5RHCD SGD HQHSHRG gpRf, i FT «<s- -mm r.-q.-ii-iije- btin™ rw,i 
9C1SN 5GD RNTSG XNT B9M RDD SGD I 
5NQ NE f-DRRNJ-B? BNKTLM" 
9251 LET Bt=-97S80019" 
9259 RETURN 
9i4CBLET (Wa-fiX 3 fii"E=- HM SGOXRS a ae ° L K SS^'tK 1 BQ90HHF BONRR ON 
SNVDQSOONOKD RS300 95 XNT RTRCJH i GWDR 



3173 RETURN 

91 BO LET H»="HM KDHEORSQQ RPT9QC 
15GDQD 9QO BHMDL9R DUOQWGDQD" 
9131 LET BS="182S2507* 
9169 RETURN 

9190 LET RS="HM SGD YU ENLOTSHMF 
BDRSSGD FJDBQD39QX 5DKKR xni 
SN 59JD SGO HUES TO" Jt -" V * VK *™ 
9 191 LET B$=-O0C0270O50- 

g:?S S £!*J:° °5La.'.»RU<> <» .Mi 



RGNO SGDQD 9Q1 
ODR ENQ R9KD" 
9901 LET B*=~<XX>023" 
9205 LET IT=9 
9209 RETURN 

92 lO LET R$= "NTSRHCO FS ONQSKOMC 
R5iRS9SHhMi5GOCO HR 9 Q9GKJ SN S 
GO MNOSG" 

9911 LET Bt="46J413" 
9219 RETURN 

9320 LET E**=~ 13SAOOai" 
SsSS. 1 -^ M*="HM 5N5SDMG9L BNTQS 



9 ISO LET n$=-R5SMCM"F R\ V9QQQMX 
R5QDDS PS9SHNMX-9BQNRR 5GD QN9C H 
R 9M DMNQLNTR (FQDDM 5NVDO RKNBO " 



I5DKDBNL SNVCXir 

HS HR UDOX VHMCX GOOD" 
9131 LET B*= "32150009^ 
9139BRETURN 



9CI5GDOD 90D OKDMSX NE NKCiRNNJR 



9261 LET Bt=-SSS6W20' 

3265 !_ET 1T = 10 

■3363 RETURN 

927Q LET RS= "HM Sa9E9KF9Q RPT90D 

iSGOQO 9QD 5GWR9MCB NE OHFDNMPi 

EKXHMT 9QNTMCI5GOQD HR 9M NKC L9 

M ROKKHMFxRHQCRDDC" 

9271 LET Bt^-26003219" 

3275 LET IT=3 1 

9573 RETURN 

SaSOBLET ft$i'NM SGO EONTMC eknno 

NEiSGD KhSW GHEH RSNODlXNT B3M 
HTX 9M 3DQM3K SSXUDOX EiMLODSHSHU 

92SO LEX Ri-T«M SGO FONTMC EKiNNS 

NErSGO KHNM GHEH RSNODlXNT B9f* 
STX 9M 9DOH9K SSXUDQX BNLODSHSHU 
D QQHBOR GOOD" 
3261 LET B-S = " 00000024-4 1 " 
9265 LET 17= 33 
32E9 RETURN 

9290 LET R*="HM SGO GNKflNQM" 

9291 LET B*= "000000250038 " 

■':l-_4 return 

-.i-.:o LET R$;"HM 6NUOM5 F9QCDMI5G 
D3D 9QO 5D9 RCNQR CN55DCI9QNTMC' 
9301 LETT B*="0O32004-~7" 

9309 RETURN 

9310 LET Pr«=-HM 5GD R5Q9MCX XNT B 
9M ROD 09Q5 NE 5Q9e9HfDQlRPT90D 
BQNL GOOD" 

3311 LET B$:"31330026" 
93 13 RETURN 

J330BLET Ft*="NM SGD DLR9MOLDMSI9 
BNTOKD NE SNTQHRS RN9SRIFDMSKX 

93SO LET R*="NM SGD E3LR9MJLDM3I9 

BT1TOKO (ME SNTQHRS PJ i 
R9HK CSR5' 
3321 LET B*=-3a5 1' 
93B9 RETURN 

'3j:j0 LET R* = HM L9QRKD 9QBG«TMGD 
QFONTMC R59Sh*4MlSGD SQ9HMR SE9UD 
K D9RS 9MC VtJRS EG»«_ GOG*}- 
933 1 LET B* = " 00003E4.90S " 
9339 GO TO 9373 
934C, LET R*="HM RNMC RSODQ5 RS95 

934 1 LET B*» ■00003634.04," 

9343 GO TO 9373 

KBO LET fi$="HM NWENOC EHQ8TR R5 

9SHTJW - 

:--..-5-J LET B*at"OO0O3"73S0e" 

9359 GO TO 9373 

33BC 1 LET R»="HM 5N5SDMG9l_ BNT&S 

QNSCXRS9SHTMM- 

9361 LET B»>= "0000363635" 

9359 GO TO &373 

9370 LET R*="HW QNKPNQM BS95MMH- 

3371 LET B*--00OO003"730' i 

3373 RETURN 

S3SO LET R$--95 SGO 3NQ NE 9 EDV 

IR59HQR 9MC G9UD ENTMC SG01C9L90 

5 RQNQI5GDX RDKK SGDOL9K TMCDOVD 



__ LET B*: _ 
9332 LET B(3J=0 
9393 LET CRRRY 

9399 RETURN 

9400 LET RS=-HM SGD BNLDT5DGUOXI 

a400 LET R*="HM SOD BNLJUTSDQXCOO 
5QSLDMS IME KHNM GNTRDaSGOX G9UD 
RODBSOTLR ENO R9KO" 

9401 LET B«: "00000-X.Kx:'&a9" 
Q405 LET IT>=15 

9409 RETURN 

9410 LET Pv*="r*"1 -SGO NRRDQU9SHNM 
EKJ^QNE SGD 5TM)0»UDQ>: RBDMHB RT 
5 5N59KK Xl DNH-15KDRR ML. 3633HC - 
94-11 LET B$>"OOOOOOO.JOOl5" 

94 19 RETURN 

9430 LET R*="HM SGD DGE>.»S>QD QN3C 

I5GO ON9C RSHKK CHR900D9QR HM5N* 

SGO MNQSG" 

34.B1 LET B*=-4401" 

9429 RETURN 

9430 LET Pv*=-HM RS 9KR9WJXNT VQ 
KOOG 5NN E9Q TO SGOIIX.FV90D QN9C 



Q44.0BLET RS=-HM BOFDMS PSQDDa 2 
944-1 LET Bfu="0S07" 

94.49 RETURN 

9450 LET B$="HM ODFDM5R OQQ-JxSGD 
<9D 9QD OOD55X EJ-CNVDGR CIJSSDC 9Gf; 
TMC" 

9451 LET B1="46S24546" 
94-59 RETURN 

9460 LET R$="HM XD NKCD 5D9 RGNO 

ODJ9E5DQ 9 QDK9WHMF BTO NE 5D9 X 

NT G9UD SN BNMSHMTD XNTQ RD9QBG' 

94.61 LET 64="000031" 

9462 LET Ta=TS+l 

9459 RETURN 

94.70 LET R$="HM 9 ODBDOSHNM ENXD 

Ol9 RDBOD59QX RLHKDR 9S XNT' 

947 1 LET B* - " 0000000039 - 

9479 RETURN 

94BO LET H*="HM 09CCHMESNM RQ RS 

9SHNM" 

94S1 LET B* = "000000530052- 

94SH IF R t IS 

■ >'"'-QC«X'5£ " 
C-.lo>., .. t. i 1 ["- 
9469 RETURN 
9430 LET R» = 



THEN LET 



"QQ© 



R59MCHMF 



SGD KHE 



__81 LET B* = 
93S5 LET IT=I4 
33S9 RETURN 

_ET RS="ITRS NM XNTQ V9X NT 
S NE SGD BI-MX.3 9E5DQ ^'9SE3GHME = 
DSJIIH BOM ROD SG9S XNT G9UD ROOM 



949 1 LET B* = " S00000000030 " 

3499 RETURN 

3500 LET R*=-NM 9 5NTOHR5 RN9S E, 
NIG9L05T4M BNTQSxXNT 9MC SGD HN9=. 

CMR900D90 HMSN SGO CHR59MBDX " 
950 1 LET B$t'5TQP" 

95 09 RETURN 

9510 LET R*-"MM Q9CCHMFSNMJ 
F-QNT-tC RS95HNM" 
3511 LET B»= "0034000049" 

- " O THEN LET B* = 



9512 IE I 
900004.9" 

9513 IE I 



E16)=0 THEN GO TO ' 



3515 LET CRRRY 



I W'XBCLflD ROM 
5HRG Q9HK RS95HNM»Kl*lcrW 5Q3HMK' 
FN DSRS EONL GOOD - 
3521 LET B*= ' , 0000-*95'l-- 
■95SS IF H(15)=0 THEN LET B»="0OO 
Q99" 
352S LET IT= 15 

9529 RETURN 

9530 LET R$="HM NUENOC R59SI-MHIS 
GOOD 9QD TMHUDORH3X RTHKCHMFRI9v 

. 9QNTMC " 



9535 LET IT= 

9539 RETURN 

9540 LET R*= 



354£BIF R.:i6)=0 THEN GO TO SSflS 

OSJ.3 LET FU 16 1 =0 

9S4a LET CHRRY=CHRRY-1 

9550 LET Pv*=~NTSRHCO NWENOC TSC* 
ENN5R9KK FQNTMC- 

9551 LEX B*i --' 

9559 RETURN 

9560 LET RS="9S SCO SOL-OKD EOCLi 
BNTMSQX BKTR ITR5 NTSRH^INWENOC 
IXNT RODMC SOD ODR5 NE 5GD C9XXV 
956GHMF RN9SR NM SGO OHJDQl" 
SS61 LET B*="STOP" 

9559 RETURN 

9570 LET H»="RS9MCHMF RX 9 KSQFO 
NKC BGTOBG" 

9571 LET BS = "OOSQBB* 

957S IF R<16»=0 THEN .SO TO 9575 

33T3 LET R115)=0 

9574 LET CORRYiCRRR-i'-l 

3S79 RETURN 

9530 LET fi*="HM NWENQG BH5X R3MJ 

IXNT G9UD VH5GCQ9VM RNLD LNMDX" 

9581 LET B$="5©" 

3554. IF 5ET1:1 THEN GO TO 9SS7 

3555 LET CRSM=Cfl5H+ ISO 

95B5 LET 5ET1=1 

9589 RETURN 

9S30 LET B*="6150" 

9591 LET B*-"NT5RHCD SGO KHES " 

Q^=-3 RETURN 

LET e*=-G36075S2- 



9600 

9601 

9QD 



LET n*-"HM 9 BNQQHCNQkSGDQO 
LSMX STQMHMFR" 

__ RETURN 

9510 LET B$="536JOOB2" 

9511 GO TO 9601 
9620 LET B«="606a6aS2" 
952 1 GO TO 9601 

9630 LET Bt= "00745553" 

9631 GO TO 9601 
god-O LET 8*="73006664" 

95*11 GO TO 960i 

3650 LET B*-"67005065" 

9551 GO TO 9501 

9650 LET Bf "' 



956 1 GO TO 960 1 

aoTO LET Bt^ u 6957S3Sl" 

95-71 GO TO 95G1 

9650 LET BS = " SaesOOTO " 

9SS1 GO TO 9501 

9690 LET B*=" 00616971" 

9691 GO TO 9601 

. 9700 LET B* = " 50607072 " 
QTOl GO TO 9SO! 

9710 LET B*="a00071~ 

9711 GO TO 9601 

9720 LET B«= "006500&0" 

9-721 GO TO 9601 

9-73O LET 64 = " 6AOD75 " 

9731 GO TO 9S01 

9740 LET B* = " 00006070. " 

97*11 GO TO 9601 

OTSQ LET B*= " OOTS775 1 "" 

9751 GO TO 9501 

97SO LET B* = "OOOOOOT6" 

9761 GO TO 9601 

97TO LET B** "760079" 

977 1 GO TO 9601 

9750 LET BS^'OOeOOOTe" 

9751 GO TO 9601 

9790 LET R*=-GDQO 95 K9RSX *BNMF>; 
9STK95HNMRIIXNT G9UD ROS TO 9 RH 
MSK9HQXRQN9CB9RSHMF RS95HNM NM S 
GDlONNE* 

9791 LET B*=-RR" 
9799 RETURN 

9SOO LET 6J:-70006S6C'" 
SeOl GO TO Q601 

9510 LET R*= "E9KKHMF EQf«_ 9M NTS 
RHCO VHMCNV SN SGD FQNTMC RDKNVi 
XNT RODMC SGO MOWS 1 "JIXXJR HMxSG 
D LHCCKDRDW GNROtS59K" 

9511 LET B$i - 5TDP" 

9Q19 RETURN 

■3S79 PRINT "IT IS 5 : 30 PM U , , , ■■ VO 

U RRE TOO LRTE" 

3S50 PRINT "YOUR MISSION ms FRI 

LED- 

9SS1 STOP 

95S5 GO TO S500 

9S99 5TOP 

9900 CL5 

9901 PRINT . "STREETS" 
99©2 PRINT , . T" 
9903 PRINT . , " 
99(» PRINT 

9905 PRINT ~ I - 

9906 PRINT " ~;CHRS(230) 

9907 LET RJ=CHRt ( 1285 
390Q PRINT " -;R*,'R* 
9909 PRINT u ";CHR*(13ai 
MR*! 1331 
3910 PRINT " ";CHR*(13ai 



CHR4 I 130) 




chrs i 13a) ; R* ; R* ; r* ; 






9915 PRINT - -;R*;R*;" ';fi$;q 
*; " -;CHR* t 130) ,R$;HSiRi,B$;H$, 

"■ ";R*;" f ";OIRS( J3&) ; - ";R4 

9916 PRINT " ";ft*:Rs;- -;R$;R 
t; " _ ;RS ; R* ; R* , R* ; R* .; r* ; r* ; ■ 
*;R* ; "V " ; chr$ ( 136 ) ; r$ 
9917_print -fflBffla-;RS.;RS.:"9IB-;R«;i 

FOR B= " ° 



99SO PRINT "YOU MUST WORK FOST T 
O DISCCCR THE SECRET . BUT DO N 
OT GET DISTRRCTED BY UNIMPO 
RTPNT EVENT50R YOU WILL BE TOO L 
RTE. " 
9965 PRINT 



9919||FOR B= 1 TO 33 



SySOHHwltViT i 

■■ '■■. 

9922 PRINT RS,R$;R$, "PRESS ( 

INE TO STRRT " ; 

9924 FOR R= 1 TO 19 

99PS PRINT R$;R$,' 

S93S NEXT R 

9930 INPUT Z* 

993S CLS 

9940 PRINT 



H*,H*;0*,RtJRS; 



STREETS I 



9919 PRINT -THI5 IS RN flOVENTURE 

SET IN THE STREETS OF LONDON . " 
HBO PRINT -YOU HRVE R MISSION T 
COMPLETE IN ONE DRY . THE TIME 
15 9:00 RM RNO YOU MUST BE FINI 
SHED BY 5 : 30 PM . - 

Q9B5 PRINT " UNFORTUNRTELY YOU CR 
NNOT RECflLL WHAT IT IS THAT YOU 
APE SUPPOSEDTO BE DOING . • 



PRINT "YOU STRRT YOUR DRY J 
n , . 'HIGH WYCOMBE. GOOD LUCK" 

'S70 PRINT 

9)975 REM PRINT "PRESS > M < , DURI 
NG PLOY, FOR R LIST OF P055IBLE 

COMMANDS . " 
9977 PRINT , "PRESS N.'L TO STRRT" 
39JSO INPUT -Z.% 
99S1 CLS 
eosa GO TO 12 

9989 STOP 

9990 REM 

A STREETS 

■» LONDON 

■ 



HORNBY 
SOFTWARE 

SPECTRUM 

PRO GOLF SERIES J &§ 

NEW ERA IN COMPUTERISED GOLF 



SHAPE OF SHOT 




S TOP GOLF COURSES 



13) PLAYED OFF ANY HANDICAP 

m ON EACH HOLE DIST, PAR. GREEN ENLARGEMENT 

15) CONTROL SHOT - CLUB, STRENGTH, DIRECTION^ 



WENTWORTH - EAST & WES1 
PRO GOLF £4 95 16I48K 
9 HOLE SIMULATED COURSE 
ALL PRICES INCLUSIVE OF V* 



P, AVAILABLE FROM: 



HORNBY SOFTWARE 

21 PINFOLD HILL, LEEDS LS15 OPW 




■♦MAWflC BWT ' '• '■ ■ • ■ ■ ' 



AUGUST/SEPTEMBER 1! 



■ZX81 /SPECTRUM DOMESTJCl 



Conversions 

A program with many uses from 
kitchen to work shop from Jonathan 
Court of Poole. 



SdS./yrv 



' iathoms, pots 



f length ffom „.,,< lemui-fei.-r 

». CufBCy ot 7 signrti( 



E R S ION 



1. LENGTH 

a. AREA 

*. LIQUID CflPflCITY 

5 . UEIGHT 

6. TEMPERATURE 



KILOMETRES 

INCHES 

FEET 

FATHOMS 
POLES (RODS) 



enter "2" in reply to the prompl the proi 
FROM?", and "5" in reply to temper; 



Program notes 



SQUARE MM 

SOUHBE METRES 
5QUBBE KM 
CENTIHRES 
ARES 

HECTARES 
SQUARE INCHES 
SQUARE FEET 
SQUARE YARD5 
PERCHES 
SQURRE CHRINS 
ROODS 



SQUARE MILES 



IZX81 /SPECTRUM DOMESTIC! 



dually the number of yt 



obtained by dividing the vali 
by me value tor Ihe original 



rs701Q-7030 Thei 



Lines 7 150-7 160 



M 7040-7070 The unit i 

checked i 

;s 7080-7 100 The actui 



*J Q *L U M E 



CUBIC DECIMETRE5 

CUBIC METRES (STERESt 

CUBIC INCHES 

CUBIC FEET 

CUBIC YRRDS 



I O U I D 



C R P R C IT 



HILLILITTRES 



GRLLON5 



es 1440-1460 
a 2000 





U E I G H T 




, 


HILLIGRRMS 


























































11 


TONS 




FR[ 


M "? 




Fig.ll 


). IWtcM^ldk 






TEMPERRTU 


R E 










. hHHWtNHtil 




3. h 


ELUIN 




FROf 






Fig 111 


T.^rswnconwik.n t,M,. 





J2X81 /SPECTRUM DOMESTiCi 



ie4000 
le 5000 



is6010-6040 Thename 

a 6050-6090 TheLt is 
156100-6240 Thisissirr 



is 6250-6260 The lemoeratui 



Hire 3010 is the numl 



ff in line 5010is them 



is 6310-6380 
is 7000-7200 



Spectrum 
compatibility 



jeSAVEdby: RUN 







LENGTH 














































FRTHOMS 


il 




POLES IROD5) 












MILES 






INPUT 


NO. OF CENTIMETRES 


Fig. 3. Lgngrti 


—- 



******##**1(* " 



**+*♦+#*##** 



" #****##*#*-* ********* 



70 PRINT 


AT 


7,7) 


1. 


LENGTH" 


S0 PRINT 


AT 


P.^l 


7. 


AREA" 


90 PRINT 


AT 


11,7 


"Z 


VOLUME 


100 PRINT 


AT 


13,7 


"4 


LIQUID 


ACITY" 










110 PRINT 


AT 


IS, 7 


■5 


WEIGHT 


115 PRINT 


AT 


17,7 


"6 


TEMPER 


119 REM *USE 


IIWEF 




PRINT I 


*NEXTLINE 






120 PRINT 


AT 


21,0 




Inpu 










130 INPUT 


A 








140 IF A< 


□ 


A>6 


OR 


AOINT / 



HEN GOTO 130 

150 GOTO 1000*A 
1000 REM *** lungth *** 



1 


LENGTH 






























































FURLONGS 






IS CENTIMETRES 
15 EQUAL TO 

3 -937eea inches 




If 


ft-***.*.*****. 






1 . 


TEMPERATURE 














KELUIN 





IZX81 /SPECTRUM DOMESTIC! 



50 LET A* 



200 LET B 



IMETRES" 

CENTIMETRES" 

100 

METRES" 

KILOMETRES" 



POLES(RODS) ' 
= 5.5 
0>="CHAINS" 

=22 

> = "FfJRLONGS" 

-220 

>="MILES" 



TUBE 



(CELSIUS] 

'RDM DEGREES FAHRENHEIT 
'O DEGREES CENTIGRUDE tCELSIUSl 
EMPERfYTURE IN 



riGHRDE (CEL5I 



DEGREES FRHRENHEIT 
IS EQUAL TO 



1370 


LET 


P=17 




1360 


LET 


N=12 




1390 


SOS 


B' 70 




1399 


REM 


ftUSB 


INVERSE PRINT IN 






*NEX 


2 LINE5, EXCEPT 






#FDR 


LETTERS L AND M 


1400 


PRI 


JT AT 


20,0| "hit L to c 



1410 PRIN 



1430 


LET 


US 


INKEY« 


1440 


IF 


» = 


L" THEN GOTO 1310 


1450 


IF 


*= 


M" THEN GOTO 10 


1460 


GOTO 1420 


2000 


REM 


***area*** 


2010 


LET 


SB 


=2.4710533 


2050 


DIM 


A* 


15, 13) 


2060 


DIM 


B( 


5) 


2070 


LET 


a* 


1J-"S0UARE MM" 


20B0 


LET 


B( 


I-SQC/IE9 


2090 


LET 


AS 


21="SQUARE CM" 


2100 


LET 


B( 


I-SQC/1E7 


2110 


LET 


A* 


3I--SQU0RE METRES" 


2120 


LET 


81 


>=SQC/1000 




LET 


A* 


4) -"SQUARE KM" 


2140 


LET 


B! 


)=SQC*1000 


2150 


LET 


M 


5>-"CENTIARES" 


2160 


LET 


B( 


)=SSC/1000 


2170 


LET 


A* 


6)=" ARES" 


2180 


LET 


B( 


>=SGPC/10 


2190 


LET 


A* 


7>="HECTARES" 


2200 


LET 


B! 


)=SQCftl0 


2210 


LET 


A* 


B)= M SQUARE INCHES" 


2220 


LET 


B( 


1=1/627264 


2230 


LET 


A* 


9!="SQUARE FEET" 


2240 


LET 


B( 


1=1/4356 


2250 


LET 




10)="SQUARE YARDS" 


2260 


LET 


B( 


0J-1/4S4 


2270 


LET 


A* 


11>-"PERCHES" 


2280 


LET 


Bt 


11=1/16 


2290 


LET 


A* 


12)-"saUARE CHAINS 


2300 


LET 


Bl 


21=1 


2310 


LET 


A* 


13>="R0ODS" 


2320 


LET 


BI 


31=2.5 


2330 


LET 




14)="ACRES" 


2340 


LET 


BI 


41=10 


2-51? 


LET 




15) = "SQLIARE MILES" 


2T.aO 


LET 


BI 


51=6400 


2370 


CLS 






23SO 


PRI 


T 


AB Hi "A R E A" 


2390 


PRI 


T 


AB 10ILSI TO 9) 


2400 


FDR 


N- 


TO 15 


2-110 


PRINT 


T N+1,0+(I AND N<- 



2420 NEXT I 




3240 NEXT N 
3250 LET P-13 
3260 LET N*? 
3270 GOSUB 7000 

3279 REM *USE INVERSE PRINT IN * 

*NEXT 2 LINES, EXCEPT * 
*FOR LETTERS V AND M # 

3280 PRINT AT 20,0|"hit V to con 
vert another volume" 

3290 PRINT TAB 7; » hit M for men 

3300 IF INKEY«="« THEN GOTO 3300 



3340 GOTO 3300 



4320 IF IHKEY«— ■ THEN GDTO 4320 

4330 LET U«=INKEY« 

4340 IF W«=-L- THEN GOTO 4280 

W*-"M" THEN GOTO 10 
4360 GOTO 4320 
5000 REM *** W eight*#* 
5010 LET P-2. 2046224 
5020 DIM A*(ll, 13) 
5030 DIM Bill] 

5040 LET A* ( A} -"MILLIGRAMS- 
5050 LET B(l)=p/1E6 
5060 LET A*<2>-- G RAMS" 
5070 LET B<2)=P/10 
50B0 LET A*(3>="KIL0GRAMS' 
5090 LET B(3)-p 
5100 LET A*<4>=- TONNES" 
5110 LET BC4>=F#1000 
5120 LET A* (5)= -DRAWS" 
5130 LET BI5>-l/256 






IZX81 /SPECTRUM DOMESTIC! 





5110 LET 


A»(6)="0UNCES" 


HEN GOTO 6160 




3130 LET 


B(6)=l/16 


6180 


PRINT AT 13,3iA*(T) 




5160 LET 


A*f7)='P0UNDS" 


6190 


PRINT AT 15, 0i "INPUT TEMPER 




5170 LET 


B(7)=l y 


ATURE 


IN" 




51 B0 LET 


A*(B)="STONES° 


6200 


PRINT A«IF) 




51 90 LET 


BtBl-14 


6210 


INPUT X 




5200 LET 


A*(9)="BUARTERS" 


6220 


PRINT AT ll,0IS*IS*!S*iS*IS 




5210 LET 


B(9)=2S 


*;S» 






5220 LET 


AS < 10) = " HUNDREDWEIGHT" 


6233 


PRINT AT 11,0JX;AT 12,0IA*( 




3230 LET 


Btl0)-112 


F) 






5210 LET 


A*(ll)="TONS" 


6240 


PRINT AT 14,4,'"IS EQUAL TO 11 




3250 LET 


B<11)=2240 


6250 


IF F-2 THEN LET X=IX-32)*f5 




5260 CLS 




/?) 






5270 PR I 


IT TAB 91 "W E I G H T" 


6260 


IF F-3 THEN LET H=X-273.15 




5260 PRINT TAB B ; L* ( TO 13) 


6270 


IF T=2 THEN LET X=X*9/S+32 




5290 FOR 


N»l TO 11 


6280 


IF T-3 THEN LET X=X*273.15 




5300 PR I 


*iT AT N+3,0*(l AMD M< = ?> 


6290 


PRINT AT 16,0! INT (XK100+0. 




INI", 


"; A*<N) 


5) /l! 






531P NEXT N 


6300 


PRINT A*(T) 




5323 LET 


P«J6 


6309 


REM *USE INVERSE PRINT IN * 




5330 LET 


Nj-ll 




♦NEXT 3 LINES, EXCEPT * 


p 


534? GOSUB 7000 




*FOR LETTERS T AND M * 




534? REN 


*USE INVERSE PRINT IN * 


6310 


PRINT AT 19,31" hit T tn co 






*NEXT 2 LINES, EXCEPT * 










*FOR LETTERS W AND M * 


6320 


PRINT TAB 9!" temperature " 


* 


5350 PR I 


IT AT 20,0; "hit W to con 


6330 


PRINT TAB 7P" hit M for me 














3360 PRI 


IT TAB 71" hit M for men 


6350 


IF INKEV*="" THEN GOTO 6310 
LET W«=IMKEY* 




5370 IF 


NKEY*-" THEN GOTO 5370 


6360 


IF WS="T" THEN GOTO 6015 




53B0 LET 


W*=INKEY* 


6370 


IF W*»"M" THEN GOTO 10 


* 


5390 IF 


«-"W THEN GOTO 5260 


6380 


GOTO 6310 






■IS-'M" THEN GOTO 10 


7000 


PRINT AT P,0|"FROM 7" 


• 


5110 GOT 


J 5370 


7010 


INPUT F 






+**temperalure### 


7020 


IF F<I OR F>N OR FOINT F T 




6010 DIM 


A* (3, 28) 


HEN GOTO 7010 


i 


6020 LET 


A*U) = "DEGREES CENTIGRA 


7030 


PRINT AT P,5;AS(F) 




DE (CELSIUS) ■ 


7010 


PRINT "TO ?" 


* 


6030 LET 
IT" 


A*(2)="DEGREE5 FAHRENHE 


7.030 
7060 


INPUT T 

IF T<1 OR T>N OR TOINT T T 


z 


6040 LET 


A*I3)="KELVIN" 


HEN GOTO 7050 




6015 CLS 




7070 


PRINT AT P»1,3;A*(T) 




6050 PRI 


IT TAB 51 "T E M P E R A 


7080 


PRINT "INPUT NO. OF ";A*IF) 




T U R E" 




7090 


INPUT X 




6360 PRI 


IT TAB 4|L»( TO 23) 


3100 


IF X-0 THEN GOTO 7090 




6070 FOR 


N=l TO 3 


7110 


PRINT AT P,0|S*|S*;S*[S* 








7120 


PRINT AT P,3JX|" "|AS<F> 




6070 NEXT N 


7130 


PRINT TAB 51 "IS EQUAL TO" 




6100 PRI 


■JT AT 11,01 "FROM ?■ 


7110 


LET Y-X*(BIF) /BIT) ) 




6110 INP 


JT F 


7150 


LET Z^INT (LN Y/LM 10J 




6120 IF 


-<1 OR F>3 OR FOINT F T 


7160 


LET Y-INT IY*10**(6-Z) +0.5) 




HEN GOTO 


6110 


/10**!6-Z) 




6130 IF 


*«1 THEM PRINT AT 11, 5i" 


7170 


LET Y«=STR* Y 




"i , AS(1 




71 80 


IF Y»(l)="," THEN LET V«-"» 




6140 IF 


»< >1 THEN PRINT AT 11, B] 








fil(F) 




7190 


PRIMT TAB 31Y*I" "JA»(T1 






-IT AT 13,0; "TO 7" 








6160 INPUT T 


8000 


SAVE "CONVERSION" 




6170 IF 


T<1 OR T>3 OR TOINT T T 


B010 


RUN 


11984 


I COMPUTING AUG- 


FPT19M 
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Looking for a Club in your area? You might just 
find it here . . . 



The zx Postal 
Club 



art a correspondence club CPO Dibsdale, 

in English-speaking Spectrum Rutherford Block 
ers in other European coun- HMS Sultan, 



e of E2.00 per year to war 
larged. The owner of any the 
the ZXBO' would 'bead 6 lea^ 



People who would like t 


ZX 80 Club 

Hameln 


SSSSSS 


1 ^SiB&3^ 


dressgi > yen°betow , ' te '" "^ ^ 




Thank you far helping me 


-iofaTwrha'veenangedTd' 




Please, "allow to to tatroduci 






Neil Henderson 


our club to you. The Club was 


market and would recommend 


p l utTr l so^wa i rea e ao , ' k ,^ ' C '^,' ,, 










Strassen. 


under the rame "ZX-80 Club 
















SwtJMWd Although our club 


at: Taunton (0823) 86291. A 


brought along so that member 


western 


the best with the magazine. 


can see the strengthsand weak 


Australia 


computers ZX 80, ZX 81 anc 


Alexander Poole 


"Competition Evening" wher. 


ZX Croup 


SSSSi? 


51 Whitmore Road, 
Taunton, TA2 6EA 


set with prizes tor the winners 


Dear ZX Computing, 






£rS 


This is from the WA ZX Group 
We are about 50 devotees o 


SV5 Mr m jenczyk no 


Chinnor and 


ZX's and Spectrums. We mee 
monthly on the third Monday a 


things so 1, Ariben Deckers, 


Thame 


u ^""Jiso^uT'mtJntioT^ 


the Melville High School, bet 
ween Perth and Fremantle. 


tion of the club. Please, take our 


Dear ZX Computing. 


mp" bookVXE "^s ™™ « 


Anyone interested is invited 


new address to your files. 


In February 1984. a group tri 


SiSbS ™»v?a' 8 - ■F , roTeu W ' r co V rJ 


Secretary, Garth Gregsun, on 


with a view to establish.n,, j 


dc...,>d ov members 


335 1671. Thank you for ZX 


Ariben Deckers, 




Garth Gregson, 
34, Chester Street, 


Postfach 967, 
D-7000 Stittgart 1 
West Germany. 


As one of the enthusiast, w,U 
Alan Head, Headmaster u i M ' 

dent that we would hav.. rhe 


TB.ndoi of 1 984 are t 7.00 for 
fxm.lv n>,mbe'sh.p. L5.00for 
u'<f'vidua> membership and 
f3 00'iir?hoseuna«i IQvears 


WesT F n ,e A man "Y' fi 


Someone, 


fn UP ter 5 m S °of 1 pmv"ding SE Ss d with 


The Group will meet on Thurs 
dey 3 May, Thursday 1 7 may. 




Somewhere, in 


facilities. It therefore seemed 




The Sultan 


Somerset? 


operXunde! the 9 ti«e Mi« Une 


June and fortniqhtly the reader 
on Thursdays at 7.30 pm in Mill 


Computer Club. 

Dear ZX Computing, 


Dear ZX Computing, 

1 wish to form a Sinclair com- 


held on 1 9 March 1 984 in Mill 
Lane School Hall. 


please contact Bryan McAlley 
on Kingston Blount 52426, 


work. Anybody in other naval 


S^at/we would meaTonce' 


Group™ ehmebBB^dVtwmin 6 


Mike Oswell on Kingston Blounl 
54002 or Len Tack on Thame 








2367. 



SPECTRUM CAME 



Cipher 



33 



The classic logic game 
programmed by M Hives 
from Derbyshire. 




puter decoding^ 
letting usseeit?^ 




3,126,60,24: RESTORE : FOR a-0 
O 7: READ b: POKE USR "A"., 
NEXT a 

3 PLOT 62, 78: DRAW 90,0 



THEN GO TO 



'900 



M BOPDEP 3! PAPER 5: CLE 
15 PLOT 0, 16S: DRAW 255,0 
!7 FOP -F-152 TO 8 STEP -1, 

18 PLOT 0,+: DRAW 255,0 

19 NEXT 1 

20 PLOT 35.0: DRAW 0,168 

22 PLOT 37,0: CRAW 0,168 
27 FOR *=57 TO 235 STEP 4< 
24 PLOT +,Br DRAW 0,160 

23 NEXT f 



715 IF IN 

nk = 2: LET „, 
720 IF INI 



740 IF INKEV* 
EY» c, ■„- AND 
AND INKEYS ( > i 

<> •'- AND INKE 
GO TO 700 



THEN LET 



lOO LET : 
105 LET : 



-1* 



: RND *6> 
RND *d> 
RND #&> 
RND *6) 



60: BEEP . 005, 



THEN GO TO 



200 FOP a-1 TO 20 STEP 2 

201 "„ INT AT 3jS . INK ZJ( 

203 NEXT a 



THEN GO TO 



813 

nk-2 


re 

LET 


INKEY* 
ur=2 




THEN 


LET 


820 


IF 
LET 


NKEY* 
uc=3 


-w 


THEN 


LET 


823 
nk-3 


IF 
LET 


US" 


-•■ 


THEN 


LET 


nt=l- 


IF 
LET 


NKEYS 


=. y . 


THEN 


LET 


835 


IF 
LET 


NKEY* 


-»g- 


THEN 


LET 


840 


IF 


NKEYt 


<> 


'b ,r AN 





SPECTRUM CAME 



AND INKEY* 



go to eoo 



NKEV 



THEN 



NKEYS 
ud=3 
NKEY* 



THEN LET 

THEN LET 

ud = 4 

NKEY* = "y" THEN LET 

nd =3 

NKEY» ="g" THEN LET 



<1 *y" AND 


IN 


KEY* <> 








945 FOR g-0 


Tf 


60: BEEP 


NEXT s 






950 PRINT 




x,24j INK 


PER 5 1 "A" 






960 PRINT 




21,Ci" 



I THEN PRINT AT <,2i PAPER 3! 
US IF ub=z*a OR ub-zxc OR ub-z 



«d THEN PRI 
APER 5 J " A " 
1025 IF UC-I 
xd THEN PRI 


-JT 


AT x,3| 

OR UC=7Xb 

AT x + I,2 


NK 7; 


1035 IF od-I 
>:c THEN PPI 


NT 


OR ud=zxb 
AT K*l,3 


OR ud 

INK 


1455 IF ua=z 


"l 


THEN PRI 
JK 0! "A" 


T ,T 



;463 IF uc = z; 



THEM PRINT AT : 



2015 BEEP 
2020 NEXT ! 
2300 PRINT 



2310 
2313 
2520 
2525 
2530 
2535 
2540 
2550 
2555 
2560 
2565 
23" 1 !} 



2595 
2600 
2605 



2620 
2630 
2635 



2655 
2660 
2670 



4 


THEN 


5 


THEN 


6 


THEN 




0,9 


1 


THEN 


2 


THEN 


3 


THEN 


4 


THEN- 


5 


THEN 


6 


THEN 




0, 1 


1 


THEN 


2 


THEN 


7 


THEN 


■4 


THEN 


3 


THEN 



■=2 THEN 
-3 THEN 
=4 THEN 



AT 0,24! INK 



9<?0Q PAPER 5: CLS 



913 IF INI 

913 

920 RETURN 



THEN GO TO 



I 310 STfiEATHflM HIGH HOflD. LONDON SW16 6HG 
V Tel: 01-769 ZB87 V 

g g THE ORIGINAL 'SINCLAIP. " SPECIALISTS 







£5.95 

MUSIC 



4&& 






HEARING IS BELIEVING 

Tete Sound 

SPECTRUM BEEP BOOSTER 



TELESOUNDFEATIJBES 



moon „„„_ „mpl«. „, h „,» ,„ M „_ „„,,,„ 

' ?pS,£iZ''yS?^ n T''" "''"•'■ ?•<"•" 

I \OOmPiJSOUHD 
HE E3 
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I READERS' REVIEWS I 



Readers' Reviews 

Reviews of software and 
hardware from the people 
who use them most — 
Yourselves 



Doomsday castle 
Fantasy Software 
Mark Stoneman 



Castle more than anything else you will already 

thecustomarycassetteboxthat use it again 
I am used to) One advantage of the door is ( 




Doomsday Castle 
venty five halls and 49 con- 
acting passages. Each ■--"-- 



this feature Is that it allows the 


only way to get through the exit 










doors which are coloured red, is 










by blasting them away; this is 








than an inlay card. The literature 


quite an involved process ! The 






there is really no alternative yet 








eg ram 


to joining the ice-cool whizz kids 










whose daily diet of DJNZs and 




or an Ancient Stone. A crystal 






EX ISP). HLs send shivers of in- 


the oddity of the wrapping of 


will increase your Shield Power 




In the 


comprehension down the com- 


this game persuaded me to part 




passage, one of which 






wlthmvE6.50asitisoneofthB 


your score. On top of the 


just have) come through 


ndthe 


the SCOPE a small step towards 


Bast names I've seen in a long 


Antechamber sits a Googly Bird, 


ex^How'efe'r, unlike in? 


TOtalb 


mactaelVsTeenmade^ '^ 


Thevilleinofthis piece is the 




the exit is operated by 




What you have to do. after 


Infinitely evil Scarthax who has 
found six ancient magic stones 


if woken it will fly up to the ceil- 
ing and unleash a thread which 


lock so you must wait 

opens, avoiding the alien 


wildlife 


book-cum-dictionary of SCOPE 




will greatly sap your shield 


and losing as little shield 




terms, is to type a lot of single 


universe . He has imprisoned 


power. The only way the ebove 






statement REM lines as per 


than in Doomsday Castle but 


bird can be woken is if an Urk 


At the end of each game your 


BASIC, then type in the magic 


has pieced them in separata 


falls on Its head: you must 




with a 


command PRINT USR 60450 






code and if you wish y 






Drought logether there will be a 


this. 






all O.K.I the SCOPE compiles 




As you explore the castle you 


and they may be publi 




weds of unseen code which will 






one of the two high scor 




certainly run a lot faster than the 


The program loads in 3 




published annually. Dn 




equivalent BASIC. The SCOPE 




they take over fifty different 


point, in this game points 




system uses 31 key words. 




forms (one type in each room}. 






deliberately unlike their BASIC 


trails, there are seven to choose 




Stones gained and not 




counterparts, such as "PUT" in- 


tram: the Fuller. Kempston, 








stead of "PRINT AT" which 


Sinclair and cursor joysticks or a 


soluteiy anything. However, 
















arguments like line and column 


layouts. Although the latter is a 




forthe4BKSue;:mim1n 




numbers, colour numbers, pitch 




A Garthog sits on each lift fir- 


tasy Software. Its 






would have been better. 


inn indiscriminately across the 




;:'-■ n..i 


If, however, you need to 


You control the hero, Ziggv, 


hall. They constantly grin ex- 






know the value of PI to 16 






E6.50 1 highly recomme 




places or the 1,000th prime 


Capsule armed only with a Mini 


they bear an amusing Frnwn. 


to buy it. 




then stop here. The SCOPE has 



Jweverafter 
your MML 



<ed along a 

B .51 :" ; 



Scope Computer 
Graphics Language 

ISP 

Tim 

Pickford-Jones 



[ 1 000 and gradeiiy deci « 



,ardy souls. 



„-es phenomenal s 


















n launch 


9 bridging piatfc 


n-.; 


kJnsrroverTomb 


SnTbtaU 


























afer but'L^l^ 


ally 




in the wa 



60461,92. This 

SCOPE to find the beginninq I 

the BASIC tram the Spectrum 

BASIC musT^aTat 123751 
Now SAVE "Scope" COD 
60000,5535 to a new piece i 



Lunar Jetman 
Ultimate 
Brian Buckley 



w Jetman to 

ind indeed anything 

happens to be carry- 



i SCOPE BASIC the screer 
rite one youraelt, Geiing at 
to set the ramtop LOADing ti 



■■• ULTIMATE 
g LOADing. 



planet. T " 
'Star Trel 



LOADed, a menu appear! 
ing the choice ol a one 
playei game and the mal 



10500 to 105140, and wlw 
quality entry to the chart. 



I READERS' REVIEWS! 






creatures floating 


n space. You 


3D Grand Prix 




removed by pulling out a split pin 








d.k. Tronlcs 




also be used on the ZX80 but 


eople 


Ihyperapacel bun 
I fast and e*trem 


n. The game 


Jamie Pulien 


BSSS£¥" h ''" 


fitted differently. 
























coking tape came through th 






ystick! 


BREAKOUT 


Everyone 


case of any mishaps, although 


rain your braking power is 'educ 
ed There are only three kinds of 












weather "dry", "light rain", or 




































To do this you must come to a 




































be refuelled and will be told 


Suckhurst Hili. Essex IG9 5TN. 




Road up 



Pit your wits against this 

holey program from 

Mike Bell in Norwich 



16 LET A=0 

17 LET S=0 

Z8 PRINT AT D,A| -*";AT 
JR SCORE- "iS 

25 LET G*-INKEY« 

S" 7 IF G*='" THEN GOTO 2 

3» PRINT AT D, A| " ■ 

10 LET A=A-(Q*-» = - Mm , 





A=A+'G*="5"J-<G*="B"i 


S0 LET D = D+ fG*="-"' i-(rs "a-i 


90 if 

TO 120 


fl *fD+l,A+l}<>««« THEN GO 


100 LEI 


A«(D+l,A+i)»" ■ 


110 LE- 


S=S+1 


120 IF 
TO 20 


A*C»*i,A+,)0- H " THEN GO 


1000 PR I 




INTO A HOLE AND DIED" 


1020 RUN 


INKEY*-"" THEN GOTO 1010 


1999 REM 


*»*«»»»»« mm OKJMjHHm 




* Change a] 1 ti into * 








* following lines. * 


2000 DIM 


A* 122, 33) 



2200 LET A* 
2210 LET A* 

222P LET A* 

2260 FOR N=l TO 
2270 GOSUB 2340 
22BP LET A* 
2290 IF N/2 

2320 
2300 GOSUB 2340 



231. 



LET 



2320 NE>!T N 

2330 GOTO 2400 

2340 LET A=INT 

2350 LET D-INT 

2360 IF A*(D,AJ 

340 

2370 RETURN 



(RND#2BJ *3 
'RND*1S>*3 
'>* " THEfl GOTO 



1-1 TO 22 
2410 PRINT A«(M) 
2420 NEXT N 
2430 FOR y= 3 T0 20 
2440 FDR 2-1 T0 32 
2450 IF A*(V,2)=»h- 
T Y-1,2-1- ■ ■ 
24 60 NEXT Z 
24 70 NEXT Y 
2480 RETURN 



A SENSATIONAL ADVANCE IN 
COMPUTER GAME TECHNOLOGY 

QMS 



Mnmiiu 



i YOU SPEAK- 
fHE COMPUTER OBEYS 



Easily programmed voice control 
Sensitive to individual voice prints 
Instant response on screen 
Your attention can stay on the screen 
- not on the controls 

wth sinczlair - 
ZX Spectrum 



v kjs^ 




SPECTRUM CAME 



Cross the 

C Stone from Hull poses the classic problem - 

_ of a co™ home* C ac™'m 9 The program beeTsu^esE 

panied by a hen and a wolf, and, if this is i 

wade across the river carrying made up of four user-defined keyboard and cf 

he corn bag, the hen or graphics characters. The pro- is either H. C, W or F (upper « 
' ■ He then realised that if cedure for defining these tower easel. No other input is 

^together without his super- to 332. Lines 400to 450 draw the key-press is O.K., lines 545 














I REM CROSS THE RIVER 








2 REM BY CHRIS HOWARD 


STONE 






3 REM B BOULTON GROUE 


HULL.HU 


Mil 


tf>< 


MBERSIEE.HU9 3ED 




w\ 


4 REM MARCH 1983 




. £S 




10 REM UDG FOR HEN 




£*£&SjL 




20 POKE USR "A", BIN 01 


00000 






21 POKE USR "A"+1,BIN 


1 1 1 0000 






22 FOR N=2 TO 4: POKE 


SR -A't 













■ SPECTRUM CAME 



River 




SPECTRUM CAME 



323 FOR N=6 TD 7: POKE USR 


■0"* 




,BIN 11101000: NEXT N 




ET w= 


330 FOR N-0 TO l: POKE USR 


"P" + 


5S0 



: usr "P" 



N,BIN 11101000: NEXT 

331 POKE USR "P"*2,B 

332 FOR N=3 TO 7: PO 
N.BIN 01000000: NEXT I 

4005REM DRAW RIVER AND BANK 

410 FLASH 0: BORDER 0: PAPER 4: 

CLS 

420 PAPER ?] FOR A*0 TO 4: PRIM 

13 TO 21: PRINT AT A,14|" ■' ; 

433 FDR A=3 TO 7: PRINT AT A, 81 



620 PRINT AT , 



■ : NEXT B 



* 480 to 510 an UDG'b* 
4S0 PRINT AT 6*<f =1) +15*(-f = -l) , 



+16*(w=-l) ,: 
": GO SUB 1000 
320 IF INKEY«=' 



THEN GO TO 52 



545 
546 



EP 1, -12: GO TO 520 

Im«="c" OR m«--C"> / 
HEN GO TO 540 



630 


LET 


■f — 1 


** 






640 


GO 


46 








000 


IF 


"«-l 


AND 


H=- 


1 AND 


D U 


-1 


rHEN 


GO 


TO 


1080 


010 


REM 


ERROR DETEC 


TION 


020 


IF 


3GN H 


osc 


N C 


THEN 



1030 IF SGN F=SGN C THEM GO TO 

1050 

1040 PAPER 2: INK 6: FLASH l: PR 

INT AT 2,7! -HEN EATS CORN": GO T 

O 1300 

1050 IF SGN WOSGN H THEN RETUR 

1060 IF SGN W=SGN F THEN RETURN 

1070 PAPER 2: INK 6: FLASH ll PR 
INT AT 2,9;"W0LF EATS HEN": GO T 
O 1200 

1080 PAPER 3: INK 6: FLASH 1: PR 
INT AT 1,B; "CONGRATULATIONS": PR 
INT AT 2,3! "YOU HAVE CROSSED THE 

RIVER" 
1090 BEEP .23,5! BEEP .25,5! BEE 
P .25,5: BEEP .25,0: BEEP .25,2: 

BEEP .25,2: BEEP .5,0: BEEP .25 
,9: BEEP .25,9: BEEP .25,7: BEEP 

.25,7: BEEP 1,3 
1100 STOP 

1200 BEEP 1,0: BEEP .75,0: BEEP 
.25,0: BEEP 1,0: BEEP .75,4: BEE 
P .25,2: BEEP .75,2: BEEP .23,0: 

BEEP .73,0: BEEP .25,-1: BEEP 1 
.25,0: GO TO 400 

1300 BEEP .25,0: BEEP .23,4: BEE 
P .25,0: BEEP .23,4: BEEP .25,0: 



TO ■ 



BEEP 



■ HARDWARE REVIEW* 



inspecting the 
interspec 



Peter Moore looks at a unit to put you in control. 




outer to switch things on i 
off. four inputs for ex temalsv 
ches, an B bit input port, B bit experienced with wires coming t ht 

ogtput port and a facility forfur- unplugged. 0.1" 'Mole*' 

-'-- trough " 



■ector called the DCP input an 
OCP Bu! 
The Interspec is hoi 

ack plastic case used mount f 

ymanufacturers.DCP printed 



to" h ea_bit ZX81 

A to d interface 

An AID (Analogue to Digit 
puter. Eight analogue inputs are 



■hardware REVIEW 



although on the unit I tested, ac- time charging and disi 

curacy was well within 10% in capacitors and watch 
the range to 2 volts. The inter- 
face has a resolution of 10 

rtiillivcltsnOmVIiifyouwereto A s7mple D/A "(Dig 

put a signal of lOmVin, your Analogue) circuit using the mands. 

computer would read this as 1 : ZN42S is described in the In- relay k 

500mVwouldreadas 50. while ters pec literature, details or the 63,0 i 



■ 100. 



>.c DCP Bus 



:luded. 



from to 7. To 

31. n is used where 



Relay Outputs 



flngagra'phonth. 



mple. to light LCDs 



plugs into this DCP E 



wiichlnpu^rtates' the COnClUSJOIl 

LET X = |IN 631-240. 

nstance. the variable * should prove an interesting ac- 

jr 8. 4™ -Bl. B ^^ "' "onics hobbyists. At 

is a E49.95+C1.95 postage it is 

"on' r;.ki. m. ___*.. perhaps a little eipensive for the 

, h3 || Eight Olt POrtS average micro user but you get a 

puts The 8 bit input and output ports 



OUT 95. IN 95 re 






It's easy to complain 
about advertisements. 



Every week, millions of advertisements appear in the press, 
on posters or in the cinema. 

Most of them comply with the rules contained in the 
British Code of Advertising Practice and are legal, decent, 
honest and truthful. 

But if you find one that in your opinion, is wrong in some 
way, please write to us at the address below. 

We'd like you to help us keep advertising up to standard. 



/ 



The Advertising Standards Authority" 
If an advertisement is wrong, we're here to put it right. 

A.S.A. Ltd, Brook House.Torrington Place, London WC1E 7HN. 



SOFTWARE REVIEW* 




intrepid Adventurer Creg Turnbull 

continues his series of reviews for 

lovers of 'arcade-alternatives' 



setting up your task-forces 
selecting (alterablel courses 


'SAVE/LOAD' option is provid 


The game is not In real-time 


X^'p'raoWyou calTea 


IG^ of 'three opera"™ a™ 


easily learni. but the game 




get to see over 90 locatic 


10. T.I each. Vou control three 


t o °™ s 5 ° mewha, . bo,in B dl " 












challenging enough to keep 






characters you occasionally 




S S Th"compute?has B s[xtBB a k' 


graphic 'planes on the map, " 9 


meet. Single and four-lette 
strings are used. For exmaple 


that they were written by fe! 
adventure -player. 1 






^inventory. L = look. SCOR = 






points so far. N, S, SW, NE, U 


Progress is made on a points 


the last (despite the level 


0, etc. Plus some new and in- 


number of death-traps. C 


system after 'Battleships', on 


teresting commands: GOES' 


which this game is based.' Set 


you are required to re-load the 


BOSE' for full description's and 


of very nasty Deodans, who 


to sink each ship. The scores are 
totalled, and the first lo reach a 


teresting strategy game; only 


'QUIET' for shorter text on each 
location (Although 1 couldn't 


unwary playersl Getting kil 
isn't necessarily the end oft 


sat value wins the 'battle'. Half 
of this large program is in 


have been so much better witfc 


noticeable effect II This feature 




machine code: although plev is 


SSvB^E r 5Sr BWth0UBht ' 


is not usually seen on anything 


EH^SSai^f 


eg. target movement 'bTcursor 
keys, form the lower border one 
square per time! (three would 


Castle Blackstar 


The description themselves 

are very long (they may even fill 


Beware of the 8 forest "with! 


SCR Adventures 


the objects needed to map 












"Artemis quests' from SCR 

extremely fast response times 9 
Essentially it is a medieval fan- 






to 3 air missions (which mow 2 




some oblique references * 


squares per O.T.), and only 
move one square par G.T. Early 

search missions to 8 locate' the 


■HEVp'^fe'atu™ ?™Z°l of'us 
who get stuck easily. Thankfully 
'QUIT', 'SAVE', and 'LOAD' ere 


ample; a pentagram and a 
Angel of Death from 'The Dev 


enemy. Once found, airstrikes 


'Knight's Quest'. The object is 

the power orh. located ui the 
vast Inn undw statement! under- 


ell supported. One feature 1 do 


from the 'Arthur' legends, an 


bombers! can be tMfout! to t^ 
and destroy the ripp'os.ng tatk 


Lussible ways around some of 
the problems. This means that 


runes about Smaug on a Mirhn 
bookl The manual is wei 


shown on the mao" '-oTa* 'en 
turns, by an expending souere 

b C.A.P, (combat anc'ett 


Meimium :240: points are 


wan!, as often happens in some 
na' all the available directions 


anything away. SCR can becorr 






an. displayed on the screen - 


Overell an excellent adventure 


fighter strength Strong air 




vn u have to guess - and it's 




strikes are most erfectiv". but 


•.-•■ 200 words Bt usM V ap i 


bss> to forget to try all of the 

■*™me ways. There are many 


™'<°neinthis series, 'Pyramid 


Status reports o- «acn task 
each G.T. a full fleet damage 


ost you one object! There are 


«:ential (especially as there are 


should certainty temrtfap&l 
ng. 




m*8$r^ 




ONCE AGAIN AT ALLY PALLY 
SEPTEMBER 8th 1984 

FEATURING A GALAXY OF EXHIBITORS 
WITH SPECIAL OFFERS AT T HE SHOW! 

SEE THE MIGHTY KINGDOM Or SOFTWARE! 

THRILL TO THE COMPUTER HARDWARE] 

GASP IT THE RANGE OF UD-ONS, BOOKS, PERIPHERALS! 

WITNESS THE OUTSTANDING FEATS OF THE 01, SPECTRUM AND mi! 

One Day Only! Don't Miss It! 
Only £1.25 (Adults) 60p (Kids) 

rSENDNo¥foVREDUCEDPRICE"ADVANcYTTcKEfs n 





n, II Miooiiu, 71 Fill Lut Tilloki, Lt 



3ROFRIR 
at Ally Pally on 

8th September 198a 



SPECTRUM CAME 



Minotaui 

For fans of 3D games, here is one of the best from! 
regular contributor C C Stock of Chelmsford. J 









Tosee the map'^M" is press- 


men! dropped you down a shaft 














ings, 2 for horizontal and 2 for 


showing you the positions of a 


vertical passages. "0" 


sword, a helmet and a shield 


represents a break in the cor- 


Only when you nave all of these 


ridor. "5" represents the nor- 


can you kill the Minotaur. Once 


mal, corridor, and : 'J"-' : 4" the 


in the maze a total of 8 section 


passages that cross at that 






you are in. Movement is very 


change Iines60-1 40 and2401 , 


fast as the maie is only altered a 


plusonline20i1 and y-1 adjust 


Thus ^uh""' "22Vn2" Wn ' 


to Minotaurs position plus 2 . 
Also, string numbers must 












Summary 




15-20 Introduction 




80-80 The maze strings 


100-180 Mappicture 




200-280 Draw corridor 




3O0-36O Draw knight 




400-530 Draw side passengers 


610-630 Can Minotaur 




700-770 Controls 




B00-840 Draw corridor 




850-870 Variables altered when lurninn 


1000-1170 MinotaursMo 




2000-2100 Draw Minotau 




2401 Drawmap 




3000-3030 Finish 




3200-3350 RND positional 




3400-3440 Pickuparmou 




4000-4540 Minotaur and r 






— . 



' MAZE **##*■ 



> REM * 
C.C. Stock 1983 
INK 0: PAPER 4: BORDER 2: 



into th« Mil 
hidd.n in thi 



60 LET a*<l>="0354553554003554 
555355554530455530" 

70 LET a«l2]-"0354553554553554 
555300004535435530" 

75 LET a« (3) -"0153255510025551 
02551520* 

S0 LET a«(4)='0155200015525551 
52001520" 




1S0 BEEP .8,-16! BEEP .8,-22: I 

IMKEY* »■■ THEN CO TO 1S0 
190 INK 6: PAPER 2: CLS : PAPER 






NEXT 



205 LET m=8 

210 FOR n=0 TO m-1 

230 IF atSfa,r>*k+p) = "0- THEN 
T m=n+l: GO TO 300 

260 PLOT a*n,lfi#n: BRAW 8,16 
RAW 0, 159-16*n 

270 PLOT 127-B*n, 16*n! DRAW -S 
16: BRAW 0, 159-16*r> 

280 NEXT n 

310 FOR n-0 TO 6 




PLOT 127-m*B,m*-16: DRA 
NVERSE li-B,16 

PAUSE 301 IF RND (.7 THEN 
SUB 1000 

xl AND y = yl THEN GO T 

620 IF q = -l THEN LET y=p m . IF * 
=xl AND <yl-y)*k <= m THEN LET 
d=(yl-y)*k: IF d>-l THEN GO SUB 

2010 

630 IF q=l THEN LET x=p! IF y = 
yl AND l«l-xl*k<m THEN LET d=(x 
l-x>*(t: IF d>-l THEN GO SUB 201 



710 IF INKEY* = "a" 


THEN 


BEEP 


. 1,241 GO TO 3400 






720 IF INKEY* -"»• 


THEN 


GO SU 


B 2400: GO TO 170 






730 IF INKEY* =-6" 


THEN 


LET k 


=k*-l! GO TO 201 






740 IF INKEY* = "7 n 


THEN 


IF a* 


la,p+k> <> "0" THEN 


LET p 


=p+k: 


BEEP .2,0! GO TO 401 






750 IF INKEY* ="5" 


AND b 


< J 5 


THEN LET k=-q*k: GO 


SUB 850: GO 



770 GO TO i 

si0 plot asm 

ERSE 1,0,- 
E 1, -8, -16! DRAW : 
DRAW INVERSE 1 ; -i 
ERSE 1)0,1 
820 PLOT 0#tn+l! , 16*ln+l> : DRAI 

-n)*15,0 
830 PLOT 48, 48: DRAW 31,0: PLO' 
43,32! DRAM 31,0 
840 GO TO 520 

850 IF b=l OR b=2 THEN LET p=: 
860 IF b=3 OR b=4 THEN LET p=; 
LET q=-q: RETURN 
1001 IF ql=l THEN IF a*lal,yl)= 
n 5" THEN LET yl=yl+j: RETURN 
1010 IF pl = -l THEN IF a*Ial,Ki: 
="5" THEN LET Xj-Xl+I! RETURN 
1020 IF x<xl THEN LET 1=-1 
1030 IF x>xl THEN LET 1-1 
THEN LET j=-l 
030 IF y>yl THEN LET j =1 

=-1 THEN GO TO 1120 

1- VAL a*(al,yl) 

xl THEN IF a*(al,yl+j 



LET 



RETU 



"0" THEN 



1090 IF *«!bj,» 

LET al-bl: LET .,_ 
*ll RETURN 

1101 IF **(*l,yl+j) <> - a . THEN 
LET yl=yl,j ; RETURN 

1110 LET j— j : LET l=-i; GO TO 1 

1120 LET bl- val a*(al,xi| 

1130 IF y=yl THEN IF a*(al, K l+l 

1 <> "0- THEN LET Xl«xl*l : RETU 

RN 

1110 IF «*Cbl,yl+J] <> - . THEN 
LET al-bl: LET ql-1: LET yl=yl. 

j : RETURN 

1160 IF a«(al, K J 
LET Jti-xl + ll re 

1170 LET j— .j ; L 



"0" THEN 
: GO TO 1 



2015 INK 3 

2020 GO TO 2030+10*d 

2040 FOR s=0 TO B: PRINT AT 5*e 

,1i INVERSE l!m*(7*e+l TO 7*e*7> 

: next B : return 

2050 FOR *m0 TO Si PRINT AT 5+c 
,5! INVERSE l;r,*(l. e *6 TO 6+e*6) 
: NEXT e: RETURN 

2060 FOR e =0 TO B: PRINT AT 5 + e 
,S| INVERSE lio*(l+e*5 TO 5+e*5) 
: NEXT e; RETURN 

2070 FOR e=0 TO 7: PRINT AT 5+e 
,6; INVERSE l|p«(lt e *4 TO 4+ e *4) 
: NEXT e: RETURN 

2.080 FOR S'0 TO 5: PRINT AT 5*a 
,71 INVERSE l|q*|l+»*3 TO 3*e*3> 
: NEXT a: RETURN 

2090 FDR »=0 TO 3: PRINT AT 5*» 
,7; inverse i;q*<i?t *2 To 20»e* 
2) : NEXT s: RETURN 

2110 RETURN 

2401 PAPER 0: INK 4: PRINT AT 
,0;»»: print 9*tg*;+*;hsih*[h*ie 
*i i*j i*;t*lg*;g*;gS iB », i*if*ih«i 
h*!s*[g*;ts; RETURN 
3010 IP tl=l AND t2-l AND t3=l T 
HEN IF SCREEN* (S,7t=-M n THEN 
PRINT AT 21,0| FLASH Ij- You 
hav* killed th» mnot.ur ■: 60 T 
O 3030 

3020 INK 5: PAPER i: Print AT 2 
0,0, FLASH 1|- Ynu have fail.d a 
r.d payed the price o-f fii.urs 

3030 FOR n^l TO 20: BEEP .2, i N T 
I RND *30>: NEXT n: INK 3: GO s 
UB 2040: ink 6: PAPER 0: STO° 



3230 LET Hi* INT 


RNE 


*22! 




w2- INT 1 RND 


*32! 






3240 IF SCREENS 


Ml,H 


2)="- 






LET 






NEXT n: GO TO 


3300 






3250 LET hI'mK 


1 ; 


LET 




1- r 


F wl>21 THEN L 










3260 IF M 2>31 ' 










3270 GO TO 3240 










3301 LET y=w|l, 


4)4 




'2 4 


1 + 2 










3330 IF a*!3,Ml 


*2) 


■ «2» 


OR aS 


'3 H 


1*2)-"1- THEN 


-E - 








1*2): LET q— i: 




SUB 
















3350 LET b = VAL 


a* 






q=l: GO SUB 850 


GO TO 








I | 


AND 




2 1 


) THEN LET tl- 










3420 IF y-2=w(l 


71 


AND 


x-2=w 


2 2 


> THEN LET t2= 










3430 IF y-2-Hll 


X) 


AND 


*-2»w 


2 3 1 


> THEN LET t3- 










3440 GO TO 330 











LET m*="iBD CA||B A||fi' 
129f ■+ CH r»; i30+. flB M t ( 
*"F M 0-* CHR* 131+" 



*♦ CHR* 133*"B'+ CNR* 13J 
130»"~-» CHR* 129+ CHR* : 
C DC D_D C.IDECH1DE 

4040 LET P*="1DCMDC1 £ 
DB ABCDABCDA' 
4050 LET q*->B AF G E El 
R* 133+"|E"+ CHR* 133 + -I - * 
133 + " -+ CHR* 136* CHR* 1 
* CHR* 133 



■ CHR- 



:t r*=-l ■>* CHRB 131 + . 
I 131*-=\/== =■+ CH r» 136 
CHR* 136+"|-+ CHR* 133+"| 
I 133+"|-* CHR* 133+"| -t c 



URN 

4520 DATA 127,127,127,: 

7,127, 127,254,254,254,' 

4,254,254 

4530 DATA 1,1,1,1 

8, 128, I2B, 12S.12B, 

4540 DATA 24,24,24, 24^ 



3220 FOR r. = l TO 4 



24,24,24,2 
254,0,0,0, 



■ ZX81 /SPECTRUM DOMESTIC^ 



The 
Perfect cover 



Give your cassettes the 
professional look with 

this program from 
F A Marshall in Surrey. 



4=9 GOTO 2500 

500 REM *****i«EDITaR**)HH<-*)H'** 

515 INPUT 0* 

517 IF OS="GAZ" THEN GOTO 593 

518 IF Q*="G!QQ" THEN GOTO 25/30 



ITD 565 

OR E«=" , ■ O 
THEM GOTO 5 



10 REM "COVER" 
15 30SUB 1000 

25 PRINT AT 1 ,1! "WHATEVER ' 
WISH TO PRINT ","DM THE BACK 
EXJPART OF THE"," COVER SHOUI 
OIJ BE ENTERED" 

30 PRINT AT 13,1I"nDte TO COI 
TO NEXT PHASE" 

32 PRINT AT 12, 1°S "ENTER E1AZ " 

35 PRINT AT 15, 11! "TO QUIT FRO 



"ENTER OQG 



200 CLS 

21? PRINT AT 0,4 J -WHATEVER YOU 
WISH TO PRINT", "OH THE BACK (I MCE 
XI PART OF THE", "COVER CAN MOli BE 

'.'ILL BE", "ABLE TO PRINT ON THE 
FRONT AREA", "OF THE COVER" 

215 PRINT AT 10, 1! "note TO CO 

216 PRIMT AT 12, 191 "ENTER OAZ" 
21- PRINT AT 15,11!" TO QUIT PR 



. GOSUB 500 



' MP* 



370 PRIMT E*( TO 32-C) 
515 LET OW^QW'ZZ-C TO 1 
580 IF GSI1>=" " THEN LET Q*=Q* 

!? TO I 



13 I 



1,3! 



5 SELF"!AT 6,0] "EXPLANATORY A3 
RUNS. " 
5 PRIMT AT 8, 3! "TEXT EDITING 
AUTOMATIC AS"iAT 10,0! "IS COP 
G. THE FIRST AND LAST" 
? PRINT AT 12, 0i "DASH LINES A 



■HE"! A 



RS ARE FOLD LINES. 
1019 PRIMT AT 16,3 
ROGRAMME IF YOU"! A 
QUIT THEN ENTER i 



■DURING THE P 



"PRESS ANY I 



THEN GOTO 1030 



1030 IF IHKE' 

1010 RETURN 

2100 FOR T«l TO 230 

2150 NEXT T 

2200 RETURN 

2500 PRINT "THAT HAS PRODUCED VI 

UR COVER. DOYOU WANT ANOTHER ? I 

RESS ANY KEYTO RUM AGAIN." 

2510 IF INKEY*-"" THEN GOTO 2511 

2520 CLS 

2530 GOTO 5 



■SPECTRUM ADVENTURE! 



The Golden 
Chalice 

who asked for a i 
jV program here 
m monster f roi 
-St Alan Davis o 
fil Lancaster. 



For all who asked for a really LONG 
i program here's a 
monster from 
Alan Davis of 











3 RANDOMIZE 








5 LET lmm=a: LET rog-0: LET n 








ount«0: LET stand=0: LET light«0;j 








! LET r = l 








10 DIM o*!3?,7>: DIM d(39): DI 1 








M r(54,6> 








19 REM fill locations array 






' 


20 RESTORE 40: FOR i-1 TO 54: 








23 READ a: LET r(i,j>-« 






: 


30 NEXT j : NEXT i 


■■ "* ■. 


&:/- 


M-... 













■SPECTRUM APVENTUREl 



41 DATA 0,2,0, 0,0,0, 2,0,0,2,0, 

42 DATA 6,0,8,2,0,0,7,0,3,5,0, 


43 DATA 0,6,0,0,0,0,6,0,9,5,0, 


44 DATA 10,17,11,8,0,0,11,9,12 
,0,0,0 

43 DATA 0,10,0,0,0,0,0,14,16,1 
0,0,0 

46 DATA 0,12,0,0,0,0,12,20,15, 
9,0,0 

47 DATA 16,21,0,14,0,0,0,15,0, 
0,0,0 

4B DATA 9,19,0,0,0,0,17,19,0,0 
,0,0 

49 DATA IS, 0,0,0,0",0, 14,22,21, 
0,0,0 

50 DATA 15,0,0,20,0,0,20,23,24 
,0,0,0 

31 DATA 22,0,24,0,0,0,22,25,0, 
23,0,0 

52 DATA 24,0,0,0,0,0,0,0,0,0,0 



53 DATA 26, f 



1,26,1 



54 DATA 0,2?, 0,26,0,30, 35,0,31 
,0,29,39 

55 DATA 34,0,32,30,0,0,0,0,33, 
31,0,0 

56 DATA 0,0,0,0,0,0,0,0,0,0,0, 


57 DATA 0,0,0,0,0,0,0,0,37,0,3 

38 DATA 0,38,0,36,0,0,37,0,0,0 

59 DATA 0,0,0,0,30,0,0,42,39,0 
,0,0 

60 DATA 39,0,44,42,0,0,40,0,41 
,0,0,0 

61 DATA 0,44,0,39,0,0,43,0,0,4 

62 DATA 0,0,0,0,0,0,0,0,0,0,47 
,0 

63 DATA 0,0,0,0,48,46,0,0,49,0 
,0,47 

64 ffATA-0,-51 , 0,49, 50,-33,0,0,0", 
0,0,49 

65 DATA 49,52,0,0,0,0,51,0,0,0 
,0,0 

66 DATA 0,0,0,0,49,0,0,0,0,53, 
0,0 

69 REM verbs 



94 REM set up object locations 

95 RESTORE 100: FDR 1=1 TO 39: 
READ a: LET o(i)-a: NEXT i 

100 DATA 11,4,90,3,7,90,11,90,9 
0,90,25, 16,25,21,12,90,90,90,90, 
1 , 90, 90,90,50, 52, 90,90,54, 90, 90, 
90,90,44,90,90,38 

101 DATA 19,39, 90 

150 BORDER 7: PAPER 7: INK 0: C 
LS 

154 REM print instructions 

155 GO SUB 9600 

197 REM describe init. location 

198 GO SUB 6000*20*r 

199 REM input routine 

200 LET move=0: LET 111=0: INPU 
T "WHAT DO YOU WISH TO DO ?'"!z* 

205 IF z*="J- THEN GO SUB 5500 

: GO TO 200 

210 IF LEN z*<3 THEN GO SUB 60 


211 IF r<26 THEN GO SUB 900 



220 IF move OR i 1 1 THEN GO TO 



munf THEN GO S 

!00 

:" THEN GO SUB 5 



■SPECTRU M ADV ENT UREJ 



900: go sue i 



to : 



GO 



250 GO SUB 500 

260 RESTORE 70! FOR u = l TO 22: 
READ vS: IF vl-w* ( J ) THEN GD TO 

270 

261 NEXT u 

265 IF v-<>w*<l> THEN GO SUB 5 

000! GO TO 200 

270 RESTORE 80: FOR n = I TO 39: 

READ n*: IF n*=«S(2) THEN GO TO 



= 1: RETURN 



THEN PR 1 1 
THEN PRII 



510 IF 7*="» THEN RETURN 
520 FDR i=l TO LEN z* 
530 IF z*(z)=" " THEN NEST z 
RETURN 
340 LET w*(l)-z*(r TO ) 
550 FOR z = LEN z* TO z + 2 STEP 
560 IF z*(z>-" - THEN NEXT z 



570 IF zHz-DO 1 ' ■ THEN NEXT 
*: RETURN 
5B0 LET k*I2I'!»Ii TO ): RETURN 



OR 






OR 



12 AND i«="n"> OR (r=21 AND z$; 

e"> OR (r = 24 AND *«-"»")) AND i 
unt THEN GO TO 670 

605 IF z*="n" AND rlr.ll THEN 

LET novc-11 LET r=r(r,l): PRIN 
"You go north." 

610 IF «*-*■* AND rir,2l THEN 

LET «a»e=l: LET r-r(r,Z>; PRIN - 



r(r,5J THEN LET move=l: LET r = i 
(r,5): PRINT '"You go up." 
650 IF zS-"d" AND rlr.fi) THEN 
LET aove-1: LET r=r(r,6l: PRINT 



1 I AND NOT I 

AND NOT r d 

iND NOT rtr,. 



795 NEXT 



It: LET r (21,31-26 

905 IF NOT imm AND rag AND r<>2 
1 AND (NOT mount OR NOT move) TH 
EN PRINT '"The roggoth kills yo 
u. " : GO TO 9990 

920 RETURN 

998 REM action conditions 

999 REM open 

1000 IF n-17 AND r=12 AND 0(101= 
90 THEN . GO SUB 5010: LET r(r,l! 
-13! RETURN 

1005 IF n=17 AND r=31 AND NOT □( 
22) THEN GD SUB 5010: LET r(r,6 
1=36! PRINT '-Beyond the door, s 
tone steps 1 " "lead down. 11 : RETURN 
1010 IF n=17 AND r=53 THEN GO S 
LIB 5600: IF a THEN GO SUB 5005: 

RETURN 
1013 IF n=17 AND r=53 THEN GO S 

ub 5010: let r(r,3)»S4i return 

1020 IF n-28 AND o(26)=34 AND r= 
34 THEN GO SUB 5010: LET p(29>« 
34: LET O1281-90: GO SUB ?0H2: R 
ETURN 

1025 IF n=20 AND r-1 AND n(3)*90 
THEN GD SUB 5010: PRINT "'In t 



^SPECTRUM ADVENTURE* 




■SPECTRUM ADVENTURES 



: LET o!22)«42: RETURN 

F n-33 AND r=3B THEN GO ! 

0: IF OI21I-90 THEN PRIN 



ir"" 


o* 


□ ar 


.. "! LET o<z 


11=38: 


RF 


TURN 












1230 


IF 


n=37 AND NOT o( 


37) TH 


=N 


GO SUB 




: pause 100 


GO S 


IB 


9130 


RETUR 








1290 


PR 


NT 


There's not 




->or 


ial 


a see. 


: PETURN 






1299 


REM en 








1300 


IF 


mou 


t THEN GO 


SUB 5005: 


PETURN 










1302 


IF 


r-2 


THEN PRINT 


■ "Whi 


-h 


way? 


: RETURN 






1303 


IF 


r=6 


THEN LET r 


-r Ir, 1 




GO SUB 5025 


RETURN 






1310 


IF 


r = 12 AND r <r, 1) 


THEN 


1 F 


T r" 


(r 


1) : 


GO SUB 5025 


RETU 




1315 


IF 


r = 24 THEN LET 


= rlr, 


PI ■ 


GO SUB 




: RETURN 






1320 


IF 


r = 2 


AND r (r-,31 


THEN 


1 F 








GO SUB 5025 


RETURN 


1323 


IF 


r-3 


AND r !r ,6) 


THEN 


i F 


T r = 


Ir 


6) : 


GO SUB 5025 


RETURN 


1330 




r=37 THEN PRIN 






way?' 1 : 


RETURN 






1333 


IF 


r=5 


AND r(r,3) 


THEN 


1 F 






3) : 


GO SUB 5025 






GO 


SUB 


5005: RETUR 






1399 


REM ea 








1400 


IF 


n=Z 


AND NOT o(2 


THEN 


P 



i 5005: RETI 



r = 18 OR r- = 19 OR 
r-'45 OR r = 16 OR 
91 ) THEN GO SUB 5030! LET 
o(9)=90: RETURN 

505 IF n=30 AND NOT of29) THEN 
GO SUB 5030: PRINT ' ■ Far a mem 



»■ "24 OR i 
NOT o<9> ; 



GO SUB 5035: RETURN 
605 IF r-7 OR r = 13 THEN LET 
Ir,2>: GO SUB 5035: RETURN 
610 IF r=25 THEN LET r-24: I 
iUB 5035: RETURN 
615 IF r=26 THEN LET r-21! I 



RETURN 
=38 THEN LET 



ln=5 AND r=7> OR 

THEN GO SUB 5040 

RETURN 

n=12 AND oil2>=16 



0: RETURN 






(.his!': PAUSE 50: GO SUB ! 

RINT '"With one blow the i 
kills'* "you. "! GO TO 9991 

1720 IF n«38 AND r=dl3EJ) ' 

O SUB 5040: 60 SUB 5700: i 
1790 GO SUB 5005: RETURN 
1799 REM give 



■ AMD . 



AND I 



LET i 



= 90! 



LET o<9>=90: LET 01111=11: GO S 
UB 5050: PRINT '"The Knight drin 
Us the water ''" gratefu 1 1 y, and sa 
ys: " ' " Thau art a good Knight a 
nd*' "true. I am not long far thi 

"..""With a sigh, the knight die 

'"They take the body of the Unig 

hf'-and leave.": LET o(7!=90: R 

ETURN 

1805 IF n=I0 AND r=13 THEN PRIN 



imm=l: RETURN 
n=8 OR n=23 THEN PR 
be greedy' ": RETURN 
SUB 5005: RETURN 



0: RETURN 

1810 IF n=2 AND r=7 AND i 

HEN GO SUB 5050: LET ot; 



SUB 5005: RETURN 



■-■SPECTRUM ADVENTURE! 



i GO SUB 5035: RETURN 



IF 



THEN 



dismount*: let i 
t=0: RETURN 

2090 GO SUB 5005: RETURN 
2099 REM look 
2190 GO SUB 5005: RETURN 

2199 REM re* 

2200 IF r =45 fl ND NOT o(2I) THEN 
PRINT ■■■You ran the boat.": LET 
r-4A: GO SUB 5900! GO SUB 6000. 

2290 GO SUB 5005: RETURN 



2299 


RE 


1 drop 










2300 


IF 


NOT 


29 


THEC 


PR 


INT ■ 


2305 


IF 


ace the 

LET o(25 
NOT ( n 1 


THEN 


1 : LET r ( 
RETURN 
PR I NT ' ■■ 


RETURN 


the ■ 


°* 


n): L 


ET 


n>=r 


2390 
239? 


GO 
REf 


SUB 56 
ligh 




RETURN 




2400 


IF 


NOT 


101 


AND 


n-10 


THEN 



2999 


REM buy 










AND 


IF 
NOT 


□ 13) 


OR n 
THEN 


PR I NT 


» 


;; 


3090 


GO 


SS' 


1 : LET o(n) = 
005: RETURN 


a: 


RE 


3100 
UB 1 


305: 


RETURN 


=13 THE 


" 




3105 

9. ": 


RET 


urn' 


You . 




=" 


" 


4000 


RE1 


JRN 










4099 


REf 


wait 










4100 


IF 


"24 


THEN 


PRINT 




T 


trol 


em 


"9" 




the" ■ '■ 


rn 


if 




•bout 


, but 


does" ■ 


"n 


-it 


* you st 




g amn 








RETURN 




th.-s 


LET of 


13 


- 


4190 PR 1 
RETURN 




Nothi 


ng happ 






5000 


REM 
PRI 


a toe 
IT ' - 
*ETUR 


I don 


T„"% 


•• 


• r 


5003 


PRI 
URN 


IT ■- 


You c 




' 


at 



2490 ( 

2499 REN break 

2590 GO SUB 5005: RETURN 

2599 REN cal 1 

2600 IF imm AND (r=46 OR r=47 OR 
r=4B> AND n=26 THEN PRINT '"Yd 

e "ioSlnlf PAUSE 50: PR 



IN 



unutes y 
giganti 



r'=37: RETURN 
2690 GO SUB 5005: RETURN 
2699 REM dig 
2790 GO SUB 5005: RETURN 



5020 


PRINT ' 
RETURN 

PRINT " 
GO SUB 

ETURN 


■You e 


xami 


• the ■■-, 


5900 
5030 


6000 + 


20*r 


RETURN 


5035 PRINT ■ 
5900: GO SU 
5040 PRINT ■ 
n>: RETURN 


You 1 


ght 


- : go su 

: RETURN 


5045 


PRINT ■ 


The ■ 


o*<n 


J i " make- 


no r«l-' "effort to re 
dies. ": LET o(n>=90: LE 
: RETURN 


T on 1=90 


5050 PRINT ■ 
1 : RETURN 


You g 


v. t 


h. ->»» 


5035 
5500 


PRINT ' 
REM inve 
LET o=0 


PRINT '"Y 


: RETURN 



n = 33 AND (NOT 
THEN PRINT ' 



on the "lo*(33) i ". ": RETURN 
2890 GO SUB 5005: RETURN 

2899 REH cl imb 

2900 GO SUB 2800: RETURN 
2990 GO SUB 5005: RETURN 



TASWORDTWOthev»ordpboc E ssor X^, 


64 CHARACTERS PER LINE ON THE SCREEN AND TO PRINTERS' >v 
MICRODRIVE COMPATIBLE — instructions supplied ^ 


g^swwjrsas 


TASPRINT 


«« K » W co>»iei n < MU > ]k p HoHr > M . 


o^M^^V^^mS^^^V^ 


r^"S=^;-=££ 


lor brochure which includes TASPRINT output. 
£9.90 fully Inclusive mail ,,,:,,, price 


TASWORO TWO The Word Processor* 

Your Spectrum Becomes a professional word processor 
with TASWORO TWO TASWORD TWOgives V oi> an amazing 

A4 paper and TASWORO TWO prinls your te«T just as'll 
Cobra RS232UO Pot ADS Inlariace 


TASWIOE - 64 characters per line! 

A machine code utility program, TASWIOE doubles the 

£5-50 lull, inclusive m.il order price 
TASMATH 1 

TASTRIG - tr.gonomelry ol right angled triangles. 
£5.95 fully inclusive mail order price 


£13-90 full, inclusive mail order price. 


TASMAN PARALLEL PRINTER INTERFACE 

Plug into you. Spectrum and drive any printer fitted with Ihe 


TASWORO TWO TUTOR 

TASWORO TWO comes complete with e manual and a 
cassette. The ca^r-ri.. (uruains your 1ASWORD TWO and 

using TASWOHO TWO. Whether you have serious applications 
0' simply want lo learn aDoul word processing. T AS WORD 
TWO and TASWOHD TWO TUTOR make ileasvand enjoyable 


screen copy software for Epson. Star. Seikosha^h'inwV^a'nd 
£39.90 fully inclu«ve mall older price 




TASMAN RS232 PRINTER INTERFACE 


TASWORD TWO £2 Demonstration Cassette 

Send just EZ lor Ihe Tas»ord Two demonstration cassette A 


£38 fully inclusive mail order price 


TASMAN SOFTWARE 


k KS &SSXS&SSS* 


SPRINGFIELD HOUSE 
HYDE TERRACE, LEEDS LS2 9LN 



AUGUST -SEPTEMBER f! 



lEDUCATION REVIEWS! 



Spectrum lessons 

A mixed bag for Mike Edmunds to 
criticise and commend as he sees fit. 







■ EDUCATION REVIEWS! 



msmmmmm£r 



AKAAirlllAI 

ANTONY 
AND CLEOPATRA 

William 
Shakespeare 






and Test Modes and Svsti 
a games element. The suit, 



;. Unfor- 



;ampbell systems for spectrum 48k" 

Can YOUR Database 
Handle This? 

PROFESSIONAL FILE MANAGEMENT. DATA RETRIEV 
ANY ADDRESS LISTS, INVENTORY. CUSTOMER OR PERSO 

IMASTERFTLE cflwf 

Microdrive commands included: 32,42 or 51 
characters per line!: 26 fields per record; 
Unrestricted number of records; 36 user defined 
Display/Print formats; Fast search & sort facilities: 
Around 32K of RAM available for data! 

Now with IMF-PRINT and mastterfile 

you can format your data for a full width printer! 

Works with most popular primer interfaces Fulr> variable report widths (over l«) columns) 
lengths Powerful numeric editing and column totals Almost nc 
ua 'a. Many more product* available Send SAB 

MASTERFILE version 09 £15.0(1 <T*- 

MF-PRINT £ 6 9s 

MASTKRFiLEwiihMF-PRINI 11 9.95 ,'"Tt™ 




nlohli- for 

d 



W COMPUTING AUGUST/SEPTEMBER 



SPECTRUM CAME 



Card Corner — 

Patience 



Colin Cooch presents a variation known as 8 card 
patience in part 2 of his series. 



* ♦ 4> V 




Program lines 



Choose lo move a can 
Subroutine to accept ; 

illegal entry. 
Chooses appro priate n 
a stack or taking a dea 

Moves cards one by 01 



m one of the st 



set by DEALTYP 
Sets up and shuffle: 
Subroutine called at 



lines from Z530 must be in 

fhe deal-type. The POKEs s 
POKE values diredly into :l- 
highlight certain (joints. 





















Variables 


1070 REM CHOOSE STACK 












■ 


At 




Complete peck 


*(66 TO ) I LET FSL-1 




cs 




1090 PAUSE 50 




DS 




Temporary string 


1100 REM PRINT STACK 


1 


KS FS 




Components of card 


1110 PRINT AT 0,61 PAPER 61 INK 




TS 




Title 


Ol "B CARD PATIENCE" 










1120 FOR N-l TO 4: PRINT AT 9,b# 




RSIxl 




Stacks of cards in rows 
Spare stack 

Choice of cards to play 


N-t| PAPER 61" "INt" "(AT 21,fi*N 


1 






-41" "1N»4|" " : NEXT n: PRINT at 




COL 






21,251 PAPER 61 "DEAL19) " 




DEALT 
OEALTVP 




Cards dealt 


1130 PAUSE 50: INK l: PRINT AT 2 




ENDP 




Flag to indicate all cards used 


,261 PAPER 7!"5bHMI": FOR N=3 TO 




FAFD 






7: PRINT AT N,Z6I PAPER 7!"JCrfri 


■ 


FLT 

LM 




Flag to indicate faulty input 


U" : NEXT N: PRINT AT G,26| PAPER 




BMNPQ 




FOR-NEXT loops 






PCD 






1140 INK 11 FOR M-l TO 13: FOR N 




W«i 




Slice r for BS* 


=2 TO 7: PRINT AT N,2Sl PAPER 71 




RES 




Flag to indicate game end 


"JFFFN": PRINT AT N • 1 , 26 f PAPER 




STACK 




Cards in hidden stack 


71 n KLLLM''r flEXT N: PRINT AT 2, 26. 




5_ST 




Posrrio'nof'card to ba printed 


( PAPER 71"GHHMi": BEEP .01,21 N 




?,., 




Card to be played. Derived from ZS 


EXT M: PRINT AT 10,24) PAPER 61" 




NOTE 






1150 PRINT PAPER 41AT 11, 211' 








1 not fit into a 1 6K machine. 


■i IF ENDP THEN PRINT A 




































11(50 LET L-14: INK 1: FOR M=l TO 












WffffEIGHTMHff 




19 STEP 6: GO SUB 1250 


„„ 














1 l-'O NEXT M 

1130 REM CARD OFF STACK TO TOP 
1190 c-0 SUP 2iie: let v.^o: let v 
-2: LET C«=S*(ELST TO SL5T*4): L 
ET SLST-SL5T*5: LET K*-C*fl): LE 






UflNT 


Tr- 


E 




'•Y"OR"N" 


T RS(1I-CS: LET R(l)-6: LET STAC 






HULE5- 




' 


!YE5,ND] 


K-STACK-l: PRINT AT 10,301 PAPER 


Ian 










. ■ 




61" "(AT IP, 30| STACK: GO SUE I 


ving 










9hH 




260 

1200 PRINT AT 10,01 INK 0) PAPER 
5I"PASE VALUE TOP ROU rK*("" 










"")" "1AT 12,31 PAPER 51" EO 
TTOM ROU: - 


sets 


1 


REM ***■*■##**>!*-***# ******* ** 


able 






XGRAFHICS mode. It 


1210 REM PRINT INITIAL BOTTON R. 
1220 "5D SUB 2T60: LET X-0: LET F 

A'5: for n-0 to 19 step 5: let c 

«-P«tl*N TO 5+Nl: LET R*(FA, to 


das 


2 


RE 


M U.D.GRAPHICS CHARACTERS 


51=C*i LET R[FA)»fi: LET FA=FA+1: 




let 


LI 


NEE 1210.1310.1320.1350.1 


LET Y-14: GO SUB 1260: PRINT AT 


je 


■'■10. 


62 





13, FN C(FA-I>*3| PAPER B|C*tl>! 




1000 


REH PATIEMCE-C.N.G00CH l^S^ 


LET X-X*6I NE>:T N: LET P**F*(21 










TO ) : LET PCE-35: LET CD1"0: LE 








F FN AIX1-MPEEK Vlt-192: D 


T DEAL-1 




EF F 


E 


<X)-<PEEK X) -192 


1230 GO TO 1120 


you 


103S 




F FN C(XI=6*(X-2 OR X-6H 


1240 REM PRINT CARD BACK 




12*(X-3 


OR X-71-tlcUf (X-4 OR »S) 


1250 INK l: PRINT AT L,MF PAPER 


n 


10.10 


RC 


NDGMIZE : RANDOMIZE 


7["?HHHI": FOR N=LU TO Lt5: PRI 




1050 


PAPER 4: CLS ; LET KS-"4" 






1060 


GO 


SUB 2£40: GO SUB 2270: G 


N: PRINT AT L*6,Ml PAPER 7|''riLu 




, SUE Z 


060:" BORDER 4: PAPER 4: I 


lm": RETURN fc 




NK 


C 


LS : PAUSE 50 


1260 REM PRINT CARD 1 


984 




XCONIPUm 






FT 1984 




91 



1270 PRINT PAPER 4 I AT 12,231" 

"!AT 13,25|" .. IF EN 
DF THEN PRINT AT 12,25) PAPER * 
I" END OF")AT 13,25|" pftCK ■■ 
12S0 INK VOL C*(5>; LET E*=C»t11 
: LET P-S-C*(l)i IF C4UJ-K* THEM 
FOR B=l TO 5: BEEP -01,5*B: ME 



Spectrum gam e 



290 TAPER 



FDR M-Y TO St 



PRINT 


AT 


Y*2, 


'+3|E*| AT 


Y + 4 






11 


(F«- 


"4"M !P»- 


" 5 " ) 




" ) + ( F 


*« 


5") + 


(F«-"H"> 


THEI 




AT Y 


*~ 


x*2i 


E*|AT Y*2 






*j> 


EC |f 


T Y<4,X4. 


IE* 




1310 


ii- 


<FC- 


•A"i* (F*- 


"7") 


THEN 








, X *2 1 E* I / 






*IAT 


' ' 3 , y. 1 2 


E*)AT Y* 


3,Xf 


1lE«iA 






!E*I 


*T Yf-5,.yi 






1350 


IF 


(FS- 


7") THEr- 


PR 


fIT "T 






E* 








1360 


IF 


(F*= 


8-1 *{FS= 


■9") 




' 1 THEN 


PRI 


IT AT Y*l 


X42 


ESIAT 






E*I A 


Y»5,Xt2 




**4;E« 










7-70 


F 


fp«- 


B") THEN 


PR 










E« 




380 


'- 


FS = " 


- THEN PRIri 


AT ','< 



'3,X«2| "■"(AT Y+4,Xt-2l "IB" I AT V 
*3,X*Z|-| ■" 

1410 RETURN 

142B T5EM-ECETT— TTJ~WOVE 

1430 IF NOT STACK AND NOT PCD Afl 

D R<5I tRtfcl *R|7> »R{S)-4 THEN LE 

T RES-0: GO TO 21B0 

1440 PRINT itUAT 0.0| - PRE33 1J.J 



CAN 

MOVE 


CARD (2JDEAL 






0J RESIGN 






1450 


IF INKEYS 




4 9P 








Mi. 7 


IF INKEN'S 


= "3'" THE 




9 Bin 








14-9 


IF INKEY* 


-"0" THE 


1 LET RES 








3S 




PAUSE 0: 


30 TO 14 




1490 


INPUT IAT 


0,01 "EM 


rER two NU 


WBER 


TOGETHER 


CARD" i 


it i at "to 


MOVE - DESTIN 


VTIQN.eg 


95"! LINE 


1500 


IF Z*~" 


]R LEN 2S<2 OR LEN 


ZS*. 


THEM GO 


TO 1450 






IF (CODE 


Sill <49 


OR CODE Z 


*I2> 


4=) t iCDDE 


ZSU) )5 


OR CODE 




'57! THEN 




ENTRY UNA 




ABLE.RE-E 


TER" I L 




TO 1 


500 







EN INPUT "ENTRY UNACCEPTABLE. RE 

-ENTER"] LINE Z«: CO TO 1 500 

1540 IP NOT DEALT AND ZSfl)-"?" 

THEM PRINT Hi; "NO CARDS DEALT V 

ET": PAUSE 100: GO TO 1490 

1550 IF ZS<1><;"9" THEN GO TO i 

590 

1560 LET FLT-0: IF K»tl}-*?- TH5 

N GO SUB 1670: GO SUB 1570: LET 

FLT-a; GO TD 1430 
1570 IF NOT FLT THEN RETURN 
15B0 LET y-m LET X = 25; GD SUB 
1260; RETURN 

1590 LET FLT=0: IF Z2 >=3 THEN L 
ET FD=l: LET D«--"J FOR M-RiZll- 
1 TO 1 STEP -5: LET DS=DS»RS(Z1 

w-4 to M); next m: let rs(zu=ds 

1600 LET FLT=0: FOR N=RiZl> TO 6 
STEP -5 

1610 IF N=6 OR FD THEN FOR M=l 

TO 7: PRINT AT 13+M.l+FN C(Z1)| 

PAPER 4| « ■■ NEXT M: GD TO 1 

630 

1620 LET C*=R*(Zl,R( Z i,- 10 T0 R( 

Zll-6): LET Y-14: LET X=FN C121J 

: 00 SUB 1260 

1630 LET C*=R9(Zl,R(ZlJ-5 TO R(Z 

11-11: LET Y=2tl2*-(Z2>=5) : LET X 

-FN C(Z2): GO SUB 1700 

1640 IF FLT THEN LET C*=R*(iZl) 

,R(Zl)-5 TO RCZD-1): LET Y-14; 

LET X-FN C(ZD; GO SUB 1260: GO 



SPECTRUM CAME 



IT AT N,26; PAPER ■ 
■ N: GO TO 169S 

CS-PKPSL-5 TO PS 
I: LET X = 25: GO SU] 
' tS=PS(P3L TO PSL' 

R<Z2>=1 AND C5!l>^ 



♦ ♦¥* 



*""• 


! PAPER 


6i INK 0! ■ " i AT 1S,30(S 


1710 if R(Z2>-1 AND R*(Zl,l)=KS 


1900 RE 


13, FN CIZ11+31 PAPER 5iC 

DEAL 
INKEV*< >" " THEN GO TO 1 


THEN GO SUB 12o0: GO BUH 1790: 

RETURN 

1720 IF RIZ21-1 THEM LET FLT-1! 


1730 IF ZZ-:S AND VAL CS ( 2 TO 3) = 
1 AND UAL R*(Z2,R(Z21 -4 TO RIZ2I 
-31=13 AND CSI4)=R*<Z2,R(Z2) -2) 


1=20 IF PCD"0 THEN PRINT AT 14, 
27i FAFER-7j INK Zi ,, NO";AT 16, Zo 
i "CARDS" i AT 19,26! "LEFT" : GO TO 
14 30 
1930 LET DEALT=DEALT+1: 


THEN SO SUB 1260: GO SUB 17901 

RETURN 

1740 IF Z2>-B AND VAL C$(2 TO 3) 

=13 AND UAL R*(Z2,R(Z2> -4 TO R(Z 

ZJ-31-1 AND CS(4)=R*(Z2,RtZ2) -2) 

THEN GO SUB 1260: GO SUB 1790: 

RETURN 


1940 IF EMDF THEN LET FSL-1; LS 

T ENDP-0 

1=50 LET PSL=PSL+15-5*<PSL=1) 
19*0 IF PSL>=PCD*5 OR PSL=PCD*5- 
J THEN LET P5L=PCD*5-4 : LET END 


1750 IF Z2<5 AND VAL CS < 2 TO 3)= 


1970 IF 





IZ21- 



THEN 



SUB 1260: GO SUB 1790: RETURN 
1^60 IF Z2> = 5 AND UAL C*12 TO 3) 
-UAL RS(Z2,R(Z2) -4 TO RIZ2)-3)-l 

AND C*!4)=RS(Z2,R(Z2>-2> THEN 
GO SUB 1260i GO SUB 1790: RETURN 



LET 



IF 



HEN LET P*-PS( TO PSL-U+PSIPS 
TO ) : LET P5L=PSL-5: LET PCD 
■PCD-l: RETURN 
800 RETURN 

S10 REM REMOVE CARD FROM TRICK 
320 LET R(Zl)=RIZl>-5: IF RIZ11 
-1 THEN GO TO 1850 
830 LET R*tZl>=R*fZl, TO IR1Z1) 
1) ) : RETURN 

840 REM CARD OFF STACK 
850 IF INKEYSO"" THEN GO TO 1 
850 
860 IF NOT STACK THEN RETURN 
870 LET STACK=STACK-l: LET C*=S 
<SLST TO SLST+4): LET SL5T=SL5T 
5: LET R*(Z1)=C«: LET R(Z1>=6: 



14 T 


EN 


LET ENDP= 




1"?80 


IF 


)EALTVP=2 


'HEN GO SUB 


000 








1990 


LET 


CI=P*(PSL 


TO P5L+4) : 


T •('= 


4: 


..ET X=ZS: 


30 SUB 1260: 


TO 


143 






2000 


IF 


PCD=3 THEN 


LET P*=P*I 


L TO 


PSL 


44) +PS;PSL 


5 TO PSL-1 ) 


*(PS 


-It 


TO PSL-6) 


RETURN 


201P 


IF 


>CD=2 THEN 


LET PS=P$( 


L TO 


PSL 




-5 TO PSL-1 1 


RETURN 






2020 


IF 


'CD=1 THEN 


RETURN 


2030 


LEI 


ES-PSIP5L 


10 TO PSL + 4 


2040 


LET 


P* (PSL- 10 


TO PSL-6J=D 


11 TO 15 


: LET P*( 


3 SL TO PSL+4 


DS( 1 


TO 


5) 




2050 


RET 


URN 




2060 


REf' 


SET UPPAC 




2070 


LET 


AS- 1 '": LE 


D*="A01202 


34045056 


1670780890 


5B10J11Q12K1 


2080 


PRJ 


JT AT B,91 


INK LI FA^F 




B*l 


I1IBSIAT 1 


1, 10! FLASH 


"PAPER 7 


INK 2i "PREPARING PAC 


i AT 


2,9 


FLASH 0! 


PAPER 5; IN 


i;b* 


B*j 


>f,B* 




2090 


FOF 


B-l TO 39 


STEP 3: FOR 


=1 TO 4: 


LET COL=0 


IF P=l OR 



,0i "PRESS 



FROM STACK 



0+2) +BS(P 



SPECTRUM CAME 



2 120 CLS : 



8,9; PAPER 5 



PEP 


i FLASH 


1 ; "SHUFFLING"! AT 12 


, C; PAPER 5; 




; FLASH 0i B5; E 


Si B* 


B* 






2130 


FOR N-l 


TO 6« 


: LET A=l+<5#< 


t *IN 


(P.ND*5£ 




IF n/2=INT tn/ 


21 T 


EN LET 


ASTASIA TO A + 4) ♦All 


TO A-I ) +ftS(, 


'5 70 ) : BEEP .01, M 


21 40 


IF n/2< 


INT 


n/2) THEN LET 


A*=AS< TO A- 


11+AS 


(A + 5 TO ) +A«(A 


To 0*4) : BEEP ,0 


,N+10 


2 J 5.0 


NEYT Ml 


CLS 


RETURN 


21313 


INPUT "F 


RESS 


ENTER TO CONTI 


MUE" 


LINEZS: 


BEEP 


05,10; RETURN 


2170 


REM END 


GAME 




21B0 


PAPER 5- 


INK 


1 I FOR N=12 TO 


21: 


PRINT At 


N,0 


PAPER 5!" 


EXT 






": N 


2190 


IF RES 


HEN 




"BAD 


luck: the cards did not " ; a 


T 14 


1 ! ■ RUN 


OUR 


AY" 


2200 


IF NOT F 


ES THEN PRINT AT 1 








1 WELL DONE ! ! 








SH 0; "YOUR PAT 


IENCE IS REWARDED 




2210 




16, 3; -YOU MAY"! AT 


17, 5 


"11PLAV 


AGAI 


:SAME DEAL"! AT 


18, 5; "2IPLA1 


AG A 


N! OTHER DEAL" i 


AT 19, 5j "3)F 


NISH 


PLAYING" 


222f> 


PAUSE 






2230 


IF INKS'! 


S--1 


THEN BORDER 


4: P 


PER 4: 


NK 


CLS : GO SUB 


2640 


GO SUB 


2120 


GO TO 1070 


2240 


IF INKE-i 


S-"2 


THEN LET DEA 




DEALTYPJ 


1-2* 


DEALTYP-2): BO 


RDER 


4: PAPEF 




NK 0: CLS : GO 


SUB 


2640: GC 


SUB 


2120: GO TO 10 


70 








2250 


IF. INKE 1 ! 


S»"3 


THEN CLS : P 


RINT 


AT 10,0 


"STAF 


T TAPE TO LOAD 


NEXT SAME"! 


LOAD 




226S 


PAUSE 


GO TO 2230 


3.270 


REM INSTRUCT 


DNS 


2200 


PAPER 2 


INK 


7! BORDER 5: C 


2290 


PRINT AT 


0,9 


INK 1! PAPER 


7i " 5 


bSHHHHH 


SBtltJ 


" : FOR N-i TO 




EEP .01 




PRINT AT N,9i 




T n: PR 


7; 'JFrrFFrFFFFFFFII- 


: riE 


NT AT 21,91 INK 1! 



♦♦V* 



2300 PRINT AT 2,141 BRIGHT II PA 
PER 6! INK 01 "EIGHT"; AT 18, 14; a C 
ARDS" 

2310 LET T*="PATIENCE" : : FGR M-2 
TO 17 STEP 2: BEEP .01,20-M: PR 
, ll+M/2; PAPER 6; BRIG 



HT 



IN 



2320 PRINT AT 10,1! BRIGHT 1!»D( 
YOU'iAT 12,0!"WANT THE";AT 14,. 
! "RULES7-IAT 10,251" PRESS"!AT 
2 , 24 i " " " Y " " OR « " N " " " i AT 14,241 " I ■ 



2330 PAUSE 


IF INK 


Y*="N" 


OR 


MKEY*="n" THEN FOR n-10 TO 


20: 


BEEP n/100,2 


: NEXT 


: CLS 


GD 


SUB 2620: GB 


TO 2530 






2340 IF INKE 


*<>"Y" 


ND INK 


=v*< 


"y" THEN GO 


TO 2330 






2350 PAPER 4 


INK a: 


cls : 


=RIN 


AT 0,4! PAPER 5j "RU 


ES FOR 


8 C 


RD PATIENCE" 








2360 GO SUB 2620 






2370 PRINT AT 2,8j P 


PER 7; 


The 


playing area 


i AT 3, a 


"is set ou 


thus-" 1 AT 4 


Bi FLASH 11 "*" 


AT 


,9! FLASH 0! 


A Spare 


Stack" 




,13i"o+ 13 cards": LET l=2t 


LET 


M=26: GO SUB 


1240: P 


KE 227 


6,F 


Af22716> 








2390 GO 5UB 2160: POKE 2271 


i,FN 


BI22716): PR 


NT AT 4 


B; PAPER 7 



2390 PRIN 


T AT 6,Bi 


NK g; PAPER 


71 FLASH 


1 ! " * " 


AT 6 


9i PLASH 0) 


"A bottom 


rciw" 


LET 


L=14: FOR H 


-1 TO 20 S 


TEP 6 


00 


=UE 1Z4ST PO 


KE 23074+C 


,FN A I 2307 


1*M) : NEXT M 


2400 GO SL 


3 2160: FD 


M-l TO 20 


STEP 6: POKE 23074+M 


FN B (23074+ 


M) : NEXT M 


PRINT AT 


6,8} PAPER 


AT 7,Bi PAPER 7! INK 


0! FLASH 1 


! ■»■ ;AT 7,9; FLASH 0[ " 


A Top care 


" : LET C«- 


404D0"; LET 


»0! LET 


Y=2: GO SUB 1260 


2420 POKE 


22691, FN A 


22691) : GO 


SUB 2160: 


'RINT AT 7 


8! PAPER ?| 


" " : POKE 


22691 ,FN B 


2269! ) 


2430 PRINT 


AT B,8! PAPER 7! INK 


01 FLASH ] 


! "*" 1AT B, 


i FLASH 0! ■ 






9! "cards ma 


; be "jAT 


i0, 18; -dea 


t" 


2440 FOP r- 


-14 TO 20: 


PRINT AT N, 


2450 GO SU 


next n: poke 23100, f 


B 2160: PR 


NT AT B.Bi 


PAPER 7 J " 


" : POKE 23 


00, FN BC231 


00) : GO SU 


5 262 







SPECTRUM CAME I 



5,8; "completed with"iAT 6,8i" 

he'lftT 8,BI"fir=t tram the " S A 
9, Si-dealt park or ■■ ; AT 10,8; 



;at 5,8; "bui : 



ending nn";AT 9,8! ' 



2680 LET B»-"l 
2690 RETURN 
2700 REM GRAPI 
2710 BORDER 2 
,2{ "STOP THE 
2720 RESTORE I 
: FOR N=0 TO : 
01, N 
2730 READ I 



LET SlL-t! 1 

LET ENDP=i 
ST=1 
35) : DIM R 



^PE PLEASE" 

700: FOR N«0 TO 1' 

; BORDER N: BEEP 

POKE USR CHR* (97+1 



2510 PRINT AT 2,Bi"When cards ar 
e"IAT I.e^'roveil +>om the'iAT 4, 
8I"bQttom to tap"lAT S.BIVdh or 
aIong";AT 6,81" bottom the gap" 

"the spare stack. " ; AT 9,8;"A " j 

1AT 10,81 "base value": PRINT AT 
13, 9; INK 5i FLASH l;"B" 
2520 GO SUB 2160: PRINT AT 13, 9| 
PAPER 4i" ": GO SUB 2620 

B|"Ycu must chaose";AT 3,Bi"the 

block"; AT 5,10i"o+ three cards" 
2540 PRINT PAPER 7; INK 0IAT 6, 
Si-2)Blacfc o-f three"IAT 7,10i"in 

reuersed'iAT 8, 10i "order " ; AT 9, 

ame": PRINT H11AT 1,01 PAPER 7; 

INK 0; "PRESS ■"!"" dr ■••"2 

2550 PAUSE 0: INPUT IF INKE 

r*-"l" THEN LET DEALTYP-1 

2560 IF INKEY*-"2" THEN LET DE 

2570 IF INKEY*< > " 1 ■ AND INKEY*< > 

■2' THEN GO TO 2530 

2580 IF INKEY«<>" " THEN GO TO 2 

580 

2590 GO SUB 2620: PRINT AT 2,8; 

PAPER 71 INK 0J"Tn repeat rules" 

1AT 3,B;"pre5s • " 1 " " " ; AT 5,B;"ot 



2750 DATA 

> 16 

2760 DATA 



2810 DATA 255 

9, 126 

2820 DATA 255 

5, 121 

2B30 DATA 15B 

■ 7, 158 

1 DATA 153 

2850 DATA 126 

0,255 

2860 DATA 121 

1,255 

2870 DATA 121 

7, IBS, 121 

2S80 DATA 128 

128, 128 
9990 SAVE "pa 
9992 CLS : PR 



1,254,254, 124, 



6,36 


16,214,2 


, 189 


219,231, 


, 128 


12B, 135, 




231,231, 




225,225, 


,157 


155, 135, 


,1=7 


155, 135, 




219,231, 


, 185 


217,225, 


, 185 


217,225, 


, 128 


128, 128, 




•' LINE 


INT 


SWITCH P 



2600 PAUSE 0: II 
2610 CLS : RETUI 



2630 RETURN 



♦ ♦¥* 



HIRE SPECTRUM 
SOFTWARE 




Technology Research Limiled 

Unit 18 Central Trading Estate 

Staines, Middlesex 

Tel: Staines (0784) 63547 



■HARDWARE PROJECT! 



Port-ability 

An Ambitious project for the adventurous user 
written by M p Moore of Petron Electronics. 




IHARPWARE PROJECT! 



address line A7. the OR a PE li ne (p ossibly the same a time. There are thirtee 

■* PRO, the output of this all. Since many of these 

i be taken straight to the close together, it is a gi 

iffer, eg.8US97. there is a possibility ti 



.. WR and A7 are low gatec 

at logic 1 ICs 2 and 3 letch the Ol io 

!iii On Iheir inputs_and hold it state 

in lines PE to PE 7. (The Upon 



IO^and^orWfc Un |CsTa*nd COnStrUCtiOll 



i supply port rt 
irtwritelPWRHir 
always be at log 



ckets should be used Solder in ca 

ie ICs as wellas the in- C2; these can be 
skets; there are seven way round; they 



'bridge' across any tracks; yellow, 
special care needs to be taken Finally, ir 



icitorsCland 
they are not 



ired is to ORJhe ap- IPCBIi this h 
: line with PWR, data tracks which 
strobed into the pins. Great ca' 



gh to low transition of the out' 
jtof this gate. 

e. Again an OR gate is used tc 



rsily using this single overlay ti 



It the PCB make sure the low' 



> ft ft ft ft ft ft 



) SK4 

I D D U U U 



. ft ft ft p ft ft 



) SK3 



< id > i-Q 



. ft ft ft ft ft ft 



J SK2 

1 BUBUUH 1 



, ft ft ft ft ft ft 



luuuuuir 



§ 



^HARDWARE PROJECT! 



pins together against the PCS 
strip so that the ends touch Ihe 



Miscellaneous 

1 ZX81 type edge cornet 



soldered. Check 

i the knife to scrat 
tracks onthePCB. Becarefi 



i>t, that the slot in tl 
away from the PC 









Checking the PCB overlay, plu 


fig-ie 


a= 


*\ 




/i 


\\ 


marked 74LS32 or 74177 ac 
cordinoly 


Kg. 4b 


W 


bent under the IC. 

Parts List 




u 


IC1 74LS32TTL 
IC2.3 74177 TTL 
Dl,2 IN4148 Diodes 




— »■■"•■-'•»—» 


R1 1K1BW5H Reslsto 
CI, 2 0,1 uf Capacitors 



e happy that 
^ucTnjTo ZX81 3 



PCB ai 



who advertise regularly in elec-l 

The PCB tan be obtained! 

Courtlands Road Newton Afr ' 
bot, Devon for E4. 50 plus 3Dp I 






mis, ICs, sc 
mat, PCB, 



NEW HOME COMPUTER CABINET 
Only £79.95 



LD? 



* £5 DELIVERY 




JUST CHECK THESE STANDARD FEATURES 



TERMS OF OFFER UK Mainland Cuslomers only Please allow up to 28 days lo, deliver 

HOW TO ORDER Send Chepue or Money Order lor E84.95 to 

MARCOL CABINETS, Solent Business Centre, Mill brook Road West. 

Southampton. Tel: (0703) 774832 (24 hr. answering service). 

Showroom open Monday to Friday 

or send SHE tor colour leaflet ol lull range 



ZX81 PROGRAMS 



The IK 
Corral 

Programmers of all ability 
levels can rope in ideas 
from this selection of the 
best of the least. 



100 LET Y=Y+(X=2>-MX=6)-<X=4)-< 
X=B) 

110 PRINT AT X,Y; 

120 LET P=PEEK <PEEK 16398+256* 

PEEK 16399) 

130 PRINT "X" 

140 IF Y>16 DR Y<A OR P<9 OR CP 
=61 AND X=A) THEN PRINT Sj Q 

150 IF X=A THEN GOTO 200 

160 GOTO 50 

200 LET B=S+1 

210 IF G/4=INT <S/4! THEN GOTO 
SQR PI 

220 GOTO 30 



Frogger 
lan Arger 




iss- rv^^ 


1 753? Well because this was Day of the month. NEWLINE, 


Turtles. A"L^^M 


fcthe first full year of the Month - first three letters. 


m\^M^F 


~ Gregorian Calendar - things NEWLINE. 


m^k^m^m^mK 


were different before 17531 Year - lall four figures]. 
The program is listed in FIGURE NEWLINE. 


Description ^^H^^^^ 


1 . Note that in addition the 






j-S Sel up variablesT K JLW 


must be typed in as shown. The of the week appears. It's a little 




program must be used by typing like time travel. Good Hunting I 


90-150 Moves Frog. 4 ^ & 


10 PRINT "INPUT DATE: DAY, MONTH 




.YEAR" 


1 LET S=NDT PI 


20 INPUT D 


2 LET A*="EOE EEE 


30 INPUT M* 


3 LET B*=A* 


40 INPUT Y 


5 LET A=NOT PI 


45 CLS 


10 PRINT AT A, A; " WMMMgMatiHgKlIM 


47 PRINT "DATE: ";D;" ";M*;" " 


•MM" 


|V 


30 LET X=VAL "10" 


50 LET X=1+D+VAL M*+ ( Y-1753) +1 


40 LET Y=X 


NT <Y/4>-43B 


45 PRINT AT X,Y; "X" 


52 IF Y>=1B00 AND Y<1900 THEN 


60 LET A*=A*(17)+A»I TO 16) 


LET X=X-1 


70 LET B*=B*<2 TO ) +B* ( 1 ) 


54 IF Y>=1900 THEN LET X = X-2 


B0 PRINT AT 2,A;A*jAT 4,A;B*;A 


56 IF (M*="JAN" OR M*="FEB"> A 


T 6, A; A*;AT B, A: B* 


ND Y/4=INT IY/4> AND YO1B00 AND 


90 IF NOT INKEY*="" THEN LET X 


YO1900 THEN LET X=X-1 ^ 
60 IF X>7 THEN LET X=X-7 ► 


= X-2 



70 IF X>7 THEN GOTO 60 Prnflram 
SB LET F*="IS" n«.c?rl«««« 
90 IF Y>=1985 THEN LET F*="WIL D « Crl P«On 


L BE" 




Lines 10-40 Set up screen. 


92 IF Y<1984 THEN 


Line 70 Direction bump-plane 






Lines 80-90 What has the bump plans hit 


95 PRINT 




Lines 200-230 The routine if the bump-plane has hit a bleck 


140 PRINT F*; " 


■';DS(X)+E* 111 1 


Una 250 Print score when the game is over. 






4 / 1 LET S=0 


Draw 


%^m 


W/J 9 CLS 


Alan Ramsey 








A short program which can 


x/\ <3H 


W 20 FOR F=l TO 20 


amuse for ages, keys 5 and 8 
draw left and right, keys 6 and 7 


X/jg 


30 PRINT AT RND»10+2,RND«15; "■ 






40 NEXT F 




Program 


50 LET L=I0 

60 FOR F=l TO 14 


key 9 will save the program (but 


Description [■■ 


A great program to experi- 


2-4 set variables. «3 
3-30 cursor movement. 


| 70 LET L=L+<INKEY*="B"3-<INKEY 


mentwt . 


*="5" AND L>0) 




60 plot position. 


B0 PRINT AT F,L; 


variables 


70gobacktoS. 

S 0-90 input characters. 

100 go back to 5. 


90 LET P=PEEK <256#PEEK 16399+ 
PEEK 1639B) 


A . . Left and right position. 


100 PRINT "Y" 


B , . Up and down position. 


OK budding Picassos. la 


110 IF P=1B0 THEN GOTO 25B 




120 IF P=12B THEN GOTO 200 


2 LET A=0 




130 PRINT AT F,Lj " " 


4 LET B=0 




140 NEXT F 


5 LET A*=INKEY* 


150 GOTO 250 


IB LET A=A+<A* 


= "S") -(a*="R"I 


200 PRINT AT F,L; "B" 


20 LET B*=INKEY* 


210 LET S=S+1 


30 LET B=B+<BS 


="6">-<B*="7"> 


220 IF S=17 THEN GOTO 9 


4B IF INKEY*=' 


2" THEN GOTO B0 


230 GOTO 60 /* -^ 


5B IF INKEY#=' 


9" THEN SAVE "ZX 


250 PRINT "SCORE "jS f \ 


DRAW" 








60 PLOT A,B 


^^^^^A 


7B GOTO 3 




Circle X \ I 


SB INPUT A* 




p J Long / \ J 


90 PRINT A* 






1B0 GOTO 5 




A simple mathematical programl 1 - > 1 

circumference once you input \ /( \l 






the Diameter in inches. This has N> j/ 


Bumper 


^ ~-^ 


a few practical uses for those \ 1 




Luuk Hiihorst 


^^^^ 


lawn or pool or patio which hap- ^ A, 




In this game it's your job to 
change the black blocks to "0" 


H H 


Pl'lr'rltogettheerea. 




blocks. Running the game you 




Line 6 multiplies and works out to alter the program to work i' 








the formula 2*PI*r, cm and metres 




you hraTlec^Wock^will 


^^B __^A 


1 CLS 




change to an "0" block and you 




2 PRINT AT 5,0; "INPUT DIAM. D 






F CIRCLE IN INCHES" 


If you come below the line 


^H ^H 


3 INPUT A 


or If you hit an "0" block tha 




4 CLS 


game is over. For each block you 
change to an "O" block you get 


^Mr 


5 PRINT AT 5, 0; "CIRCUMFERENCE 
□F CIRCLE IS" 






6 PRINT AT B,0j <PI»2> * ! A/2) ; " 


blocks will appear 


^^ 


INCHES ("s (PI»2)«(A/2)/12; " FEET 







7 PRINT AT 15, B 


"IF CIRCLE IS 250 PRINT AT 20,L("Jy" 




FLAT" 




260 


FOR T=l TO 30 




8 PRINT AT 17,0 


"THEN THE TOT 


261 


IF INKEYf^'B" THEN GOTO 400 


at 


AL AREA OF CIRCLE IS"jAT 18,15;" 

9 PRINT AT 19,0s (PI*2>*(A/2)/ 
2»(A/2){" INCHES OR" , , , <PI*2) * < A 
/2)/2»<A/2)/12i" FEET" 

IB PRINT AT 0,5,- "PRESS A TO RU 


290 
295 
300 
350 

400 
410 


PRINT AT B.T-1; " 

PRINT AT 0,Ti "1 2 1" 

NEXT T 

GOTO 50 

FOR X=19 TO STEP -1 

PRINT AT B,Lj " . " 




11 IF INKEY*="A" 


THEN RUN 


420 

00 


IF B=0 AND L-T THEN GOTO 10 




12 GOTO 11 

13 SAVE "CIRCLE" 




430 
1500 


IF B=0 AND L=T-2 THEN GOTO 


■ 


14 RUN 


- 


440 

1500 

500 

600 

i 700 


IF B=0 AND L=T+2 THEN GOTO 




Target Practice 
Dominic Carter i 


r*2N 


LET B=B-1 
NEXT X 
GOTO 5B 




AwWk.nanth.rMctlon.hoot I 




{ 1000 


CLS 




A rr B r; s Xe ct ;u n sh B °nd 1 


LQJ 


1 1010 


PRINT "BULLSEVE. . .2 POINTS" 




D to tire at it. You score the \ 
number of the point you hit - i 


1 1200 

' 1300 
1500 


PAUSE 50 
GOTO 50 

CLS 



50 CLS 
100 LET L=INT <RND*25 
200 LET B=19 



1600 PRINT "YOU SCORED 1 . . . . NOT 

BAD" 

170B PAUSE 50 

1800 GOTO 50 



COIt ■> FIRE »Nr. ict W 

D SB'S rot/4 OHOBB i-*\ 




It's easy to 
complain about 
advertisements. 
But which ones? 



ined 



print, nn posters or in the cinema, 
st of them comply with the rules 
n the British Code of Advertising 



But some of them break the rules and 
irrant your complaints. 

If you're not sure about which ones they 
i. however, drop us a line and we'll send yon 

.iliriilp.'j i upv .it ilii- Advertising Code, 

Then, if an advertisement bothers / 
hi, you'll be justified in bothering us. -/ 

Tlie Advertising Standards Authority. W 
in advertisement is wrong. we're here to put it right. 



Rescue the astronauts in this lunar 

listing for your Spectrum. Courtesy of 

John Miller. 



SPECTRUM CAME 



029 : 



FOR c-1 TD 5! I 

R.ND *<ll-m, 
,d)="G' 
030 NEXT d: NEXT c 
035 CLS 

040 GO SUE EUf^aci 
) SUB topprin 
:INT AT 0,A| 



TD 5! PRINT AT ■ 
a»!c) : NEXT c 
AT 2,0;m*l AT 3,0 



pDint»r=pi 
>32 THEN 
c = l TO 3: 



1221 


BEEP .005,24*d 


Dp- 


2: BEEP 


.005 


24*drop-10 






1223 


PRINT AT y.xi 






1223 


LET y-y+drnp! 


F y 


Zl THEN 


GO TO shiploss 






1227 


IF NOT drop THEN 


GO TO 1 


1230 


LET x = x- ( IMKE 


(* - 


5" AND 


>0) + 


INKEY* = -B" A 


■JD X 


32) 


1233 


IF ATTR ly,*> 


=3 THEN 60 


1240 


IF SCREEN* (y 


XJ = 


" THEN 


GO TD ship loss 






130? 


GO TO 1200 






199? 


STOP 






2000 


PRINT AT y-1, 


• ; s* 


FOR c = 


TO 


0: BEEP .1,-lE 


+c: 


BEEP .1, 


10-c 


NEXT c 






2001 


LET up=0= LET 


drop 


=0 


2002 


LET polnt»r=l 






2003 


LET B.(omanl-0: 


LET 


nman=nm 



2070 FOR c = l TO 5: 
*2,01 INK 51 i*(cJ : 
20B0 PRINT AT 2,m 



«=28 THEN 



AT 4+c*2,0i i*(c, pointer 
(c, TO polntcr-1): NEXT 
2120 IF INKEY* ="0" THE 


TO > J 
N LET 


2130 BEEP .005,24*up-12: 

05,24*up-10 

2140 PRINT AT y , » 5 " " 


BEEP 



60 IF y = 3 AND x=mothx+2 THEN 

TO hour 
70 IF NOT up THEN GO TO 21! 
B0 LET x-x-( INKEY* --"5" AND 
>*< INKEY* -"B" AND x<32) 
90 IF SCREEN* ly,x>*»" THEN 



PAPER 0: BORDER 0: C 



2010 CLS : GO S 



face: GO SU 



3011 
55, 

3020 PR IN 
ME TO "MOI 
3025 PRIN 
n Mi 1 ler 
3030 PRIN 
I6HT lj-Pl 
RE READY" 
3040 IF 
3040 
3045 PRIN 



c-0 TO 50 
175: NEXT 
IT AT 5,4 
ION RESCUE 

Oct 1992 



PLOT 



RND *2 

INK 31 "WELCO 

INK 31 "0 JDh 

I FLASH 1! BR 
EY WHEN YOU A 

THEN GO TO 



SPECTRUM CAME 



4001 PRINT AT 1S,0("1I 






MB" 


5,26 


4002 PRINT AT 19,01 "ill 


9090 RETURN 


till' 


9100 FOR c= USR "a" TO USR "n"+ 


4003 print at 20,0! 'nil *> I 


7: READ a: POKE c,«: NEXT c 




NK 3I-K11N"! INK 4J" " i I 


9101 LET high=0 




NX 31-KUN'! INK 41" MM' 1 


9B99 RETURN 




4004 PRINT AT 21 , 01 "HUJ J J W 


9900 DATA BIN 0, BIN 100, BIN 




.'■;;.■:::■■■::: i ;.: :■■■■■' 


0111111, BIN 1111111, BIN 110000 




4005 FOR c=l TO 10: IF m(c)>0 TH 


0, BIN 11110110, BIN 11111111, B 




EN PRINT AT 20,m<c>i INK 61 "L" 


IN 11111111 




4006 NEXT E 


9901 DATA BIN 11000, BIN 111111 




4010 INK 7: RETURN 


0, BIN 11111111, BIN 11111111, B 




3.000 PRINT AT 0,05 INK &i BRIGH 


IN 0, BIN 11111111, BIN 11100111 




T li'SCORE: " i INK 5i"HIGH: 


, BIN 11000011 




■| INK 71 "SHIP: 


9902 DATA BIN 0, BIN 100000, BI 




5010 PRINT INK 3; " 


M 11111100, BIN 11111110, BIN 11 
1, BIN 1101111, BIN 11111111, BI 




5020 RETURN 


N 11111111 




5500 FOR c=0 TO 7 STEP .5: PRINT 


9903 DATA BIN 11111000, BIN 111 




AT y.Kl INK c|*E": BEEP .01, c* 


11000, BIN 11111000, BIN 1111100 




5: BEEP .01,c*-5: NEXT c 


, BIN 111111, BIN 11111, BIN 111 




5510 LET score=scoro+300: GO TO 


1, BIN 111 




30 


9904 DATA BIN 1000, BIN 11100, 




6000 FOR c=y TO 20: PRINT AT c, 


BIN 1111111, BIN 1001001, BIN 10 




*; INK RND *7|"E-[ OVER 1 i AT c 


11101, BIN 111110, BIN 100010, B 




,xl"B*: beep .01, -c: next c 


IN 1000001 




6005 BEEP 1,-20: PAUSE 50 


9905 DATA BIN 11111, BIN 11111, 




6010 LET ship=ship+l: LET drDp=0 


BIN Hill, BIN 111110, BIN 1111 




I LET up-0: CLS I GO TO 30 


1100, BIN 11111000, BIN 11110000 




B000 PRINT AT 6,11) FLASH 1|"GA 


, BIN 11100000 




ME OVER- 


9906 DATA BIN 11000, BIN 111110 




B010 IF BCore>high THEN LET hig 


0, BIN 11111110, BIN 1111111, BI 




h=scorei FOR c = l TO 10: BEEP .01 


N 1111111, BIN 1111110, BIN 1110 




, RND *50: BORDER RND *7: NEXT 


00, BIN 10000 




c: BORDER 0: PRINT AT 11,01 BRI 


9907 DATA BIN 0, BIN 111100, BI 




GHT tl FLASH 1} -WELL DONE - A NE 


N 1100110, BIN 11111111, BIN 111 




U HIGH SCORE! ! It" 


11111, BIN 10111101, BIN 1000010 




S020 PAUSE 250! CLS : GO TO 5 


, BIN 100100 




8999 STOP 


9908 DATA BIN 10000000, BIN 110 




9000 DIM a«(5,32): DIM i*!5,32> 


00000, BIN 11100000, BIN 1111000 




9010 LET ■hip-l: LET iian'0: LET 


0, BIN 11111000, BIN 11111000, B 




x'2: LET y = 3: LET nman=l 


IN 11111110, BIN 11111111 




9015 LET s«- CHR« 19+ CHR» 1*"E" 


9909 DATA BIN 1, BIN 10110011, 




: LET n«=" "♦ CHRS 16+ CHR* 2+"A 


BIN 11111111,255,255,255,255,255 




BC ": LET n*=- "+ CHR* 16+ CHR» 


9910 DATA BIN 1111111, BIN 1111 




2<"D F " 


11, BIN 11111, BIN 1111, BIN 111 




■=020 LET malhx-e: LET drop-0: LE 


, BIN 111, BIN 1, BIN 




T score=0 


9911 DATA BIN 0, BIN 11100, BIN 




"330 LET »t*g*l-1000: LET stage2 


11100, BIN 1001001, BIN 111110, 




= 2000: LET end game =3000 


BIN 1000, BIN 10100, BIN 100010 




9040 LET wai 1=3000 


9912 DATA BIN 1, BIN 11, BIN 11 




9042 LET pinc-Z 


, BIN 1111, BIN 11111, BIN 11111 




9045 LET sur4ace=4000 


1, BIN 1111111, BIN 11111111 




9047 LET topprint=5000! LET ship 






loss =6000 


11100, BIN 11111100, BIN 1111000 




9P48 LET home=5500 


0, BIN 11100000, BIN 11000000, B 




9050 DIM m(10il FOR c=l TO 10 






9060 READ <■<■;} 1 NEXT c 


9999 RETURN 




.06 


» COMPUTING AUG.5EPT 1984 





ZX81 UTILITY 



Renum 

Many renumber programs have been published 

but this one has an unusual feature — read 

Geoffrey Byrne's explanation. 



8 W fir? x i> 



.! rn^sim 



SLOW 



33, 125, 64. 17, 0, 0. 126. RUN 9S9 ° 

number allowable is 9999 230,192,192,229,70, Now enter RAND USR 1 651 6 '00 LET A = 10010 

Bough iMs is so. in practice 35, 78, 35, 235, 229, 237, anri L IST 110CLS 

i.ne= hmh-r ihan this may be 66,225,56,18,193,124, YnLI Khn ,., d nQW find somB 1 20 GOTO A 

utilised using the Renumber 2, 3, ! 25, 2, 1, 10, 0. 9. dd | oa kina numbers in RUN 100 or GOT0 100 

Etfin Which follows. 235, 78, 35, 70, 35. 9. 24, the lislinas The listinq should 

An aduantaqe of this is thai 222,96, 105,193,24, t™ a* fni^vU' As can be seen from these ex- 

the lines pushed over the 239. amples, the ZXB1 equates 

10OOO limit cannot be re- AOOO REM ,0 ° 10 wilh A01C J "^"8 

tdiied and are thereiore safe Now enter, as direct com- AQ] F0R j _ , T0 , 5 REM statements to pad out the 

from tampering. This could be mands: AQ20 PRINT "ZX81 RULES n "™' 5 °' th ? lmeE unflE ' 

useful in preserving data held OK" ' 0000 is tha only W8V to push 

Enter'thl following program: P0KE1 651 5^0 A ° 3 ° ^^ J us'ing'the RENIMBER ^mmm'' 

SAVE "RENUMBER" As you can see. the '10' of I hope some people will find 

10 REM (47 x's) , ,0 ,° 00 has been replaced by a genuine use for these safe 

30 FOR J = 16516 TO gramme, enter RUN and then other numbers rer 

16560 the following: decimal I Since 

50 PRINT AT 1B.8;J,N 3990 REM not recogntoed by I 

60 SCROLL 9991 FOR J = 1 to 1 5 a number, it canno 

70 POKE J.N 9992 PRINT "ZX81 RULES ed for editing, and 

BO NEXT J O.K." incorruptable once 

FAST 9993NEXTJ 10000. 



JM 



■ SOFTWARE REVIEWS! 



Quicksort 

Rapid reports, courtesy of Clive Smith 



hardware department but 1 
duced by Malar. 




COMPETITION 



Competition 

Anyone and Everyone Stands to Win!! 




Let a BEEP 
SCROLL OVER Beet! 
YELLOW Subroutine 
YesterDATA 



?r One BYTES the Dust' 



Is (an OLD BINCHRS I 



Scorchers, Whiiz-Kid and Bully 
all for the 48K Spectrum except 
Whiii-Kid which is also 1 6K 

name, are quite UNIQUE!! 

says UNIQUES General 



are ol high Quality and r 
good value for money' 
So don't delay ent 
and win youf S end- 
game worth £5.99. 

Problem 



There 



i and 5 nan 



It's so simple!!! 



ZX Computing 
Unique Competition, 

LondonW1R3AB. 



• This competition isop 
UK and Northern Ireland 
ol ZX Comouting. 



Competition 
Results 



iZX Computing April/Mayl had 

country conjuring computer- 
couplets, so a big thank you to 
all ZX' readers who posted their 

the prize on offer was a superb 
Marcol computer cabinet, and 

Mr. G.J. Evens of Prestbury, 



i, hut Mr. Evans' entriei 

rake tor example, hit 
i Computer Album 



von'i be Betjemans' 



GOSUB AND THEN ARRAY 
STEP INK SCROLL OR dREM 
CODE. - DIM Pice & RAND 
NEW LOAD RED OR. 



September 30th 



; Carol Rice of 



■•■: Uly' by Mr. D.E. Povuls i 
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K-BOARD professional 
Spectrum keyboard 
£28.50 ref KB _ 
COOL-IT UNIT/ 




. Sarclaycard No _^ ___ 

KELWOOD COMPUTING Downs Row, Moorgale. RoSa^aW-?* 



KeypanelKits KeypanelKits 





for High Flyers. . . and Early Learners. 



■ZX81 PROGRAMMING^ 



Mr. Spock (of Star Trek fame) has bea med d own and 

taken up residence in Herts. —"^f— 5 
under the name of A J Harper . 



By using the operators AND, 
OB, NOT, cample* logical ex- 



gramme toju 
It A is sei to 




F1UN20andentei 



together in figi 
ZXB1. The n 



* 

1 



fit. 1 Program containing axamplns ot use ol logical etc 

5 REM A LOGICAL EXPESSION 
IB INPUT A 
28 INPUT B 
30 LET L=(A>B> 



ft COMPUTED GOTO 
110 INPUT A 

120 GOTO 1 10+20* <A=3> +30* <A=4> 
130 PRINT "LINE 130", A 
135 STOP 

140 PRINT "LINE 146". A 
145 STOP 

199 REM 

200 REM EG2: PRINT CONTROL 
210 INPUT A 

220 PRINT CHR* (27+128* CA=0> > 
230 STOP 

299 REM 

300 REM EG3: MOVEMENT CONTROL 
305 LET X=15 

310 LET X = X+(INKEY*="8 ,, )*<X<=30 
) - ( INKEY*= "5" ) * ( X >=0 1 
320 PLOT X,10 
325 UNPLOT X, 10 
330 GOTO 310 

399 REM 

400 REM EG4iFUNCTIDN GENERAION 
410 FOR X=I TO 40 
420 LET Y=(10+X)*(X<10)+20*(X>= 

10 AND X<=20)+<40-X)*<X>20) 
430 PLOT X,Y 
440 NEXT X 



■?■? REM 

Logical 

Expressions, 





ia let x=a .... 




2B LET Y=0 


the missile base 'stfT and 


missile by moving the bass 








40 LET B=Y 




sions which can be of some use 


50 LET P=10 






60 LET Q=21 


ed in line 140. When in flight 


70 LET S=B 


invaders missile is obtained 


logical expression from zero tr 


100 LET L=INKEY*="0" OR Q<21 AN 


"" For examrte °iTtte or"(T 4 




A-A + IP-A1/5 


version of example 5, lines 120 


11B LET C=RND<.I OR B>Y AND B<2 

a 


and 200 read as shown in figure 
4. Here Z = when the invade 






12B LET T=Y<Q OR ABS (X-P)>-2 






2B0 LET x=(X+l-RND>»T 
210 LET Y-(Y+.25+RND)*T 


position ofthe missile. Clear- 
ly if A=P then A will remain 


fine 200 of figure 2. In othu 
words Z should be changed roT 


220 LET A=X*<1-C)+(A+(P-A)/5)*C 


will strike the base. Now 


in flight.. i.e. T = NOTIZI This 


230 LET 8=Y*(1~C>+(B+1.25)*C 




240 LET P=P+ ( I NKEY»="B" )-(INKEY 


missile Is to the right or left of 


250 LET GN21#(I-L)+<D-l>*L 


the base. Can you escape the 






310 PRINT AT Y.XjCHR* I51|AT B, 


NOTIX AND Y) = NOTIXI OR NOT|Y) 
NOTtX OR Y) ■ NOTIX) AND NOTIYI 


A|CHR* <151-12B*C> j AT 21,P;CHR* 






149-.AT Q,P;CHR* <149-12S*L) 






32B LET 5=S+(T=B) 




33B GOTO 10B+300«(B>=20 AND ABS 






(A-PX2 OR Y>2B) 






T-N0T(ZI = N0TIY> = QANDABS(X-P)<2] 


410 PRINT S 




*J0TIABS(X-PI<2) 






VtotTT-Wm 



- Are you being zapped by 
'finger drift'? 

- Fed up with being eaten by 
monsters? 

- Put new life into your game and 
hit the right key every time with 
the new 

GAMES BOARD 

Enjoy these great features: 




All this and more for just £9.95 

From your local computer shop or direct from: 



I PROGRAMMING FEATURE I 



Light Screen 

Designer 



Toni Baker adds more to 
our great Spectrum 
graphics package 







Light Screen Designer. When 


it's all finished, what you'll end 




gram which will enable you 10 








pletely unusable until you've got 


pails one, two and three. 




like to build It up a little more. 






FIGURE ONE Ikeyboard overlay 




TRIANGLE", the key marked 


"HIDE" should be marked 




key incorrectly marked "HIDF" 




lyes, there are ten keys on each 








require the A register to be pre- 






ORG DDOD 




PUSHAF 








POPAF 


C9 


RET 









ORG DD4 








79 












LDDE. LEFT PIX 






1 07 






RLCA 


Move bits 7-3 to positrons 


CDBBDD 


CALL DR ARM 






07 






RLCA 












1 <" 












LD E, RIGHT PIX 






1 A8 






XORB 




CD8BDD 


CALL DR ARM 




Draw right arm of 


E6C7 


















A3 








Take bits 6. 4 and 3 from B, 




LD E.DOWN PIX 






1 07 






RLCA 


CDBBDD 


CALL DR ARM 






1 07 






RLCA 












SF 






LDL.A 


Assign low part of print 


1E26 


LDE.UPPIXlow 




Prepare lo draw 


7B 






LDA B 


™w number. 


C5 DRAHM 


PUSH BC 




upper arm. 












PUSHHL 






1 0F 










3E04 


LDA. 04 






1 0F 

E61S 






RRCA 
AND 1B 


teolate^nese tails 


OH DRALOOP 


EXAF.AF' 




A'Xirioop 








CP18 












CB 








Assign bits 7. 5 end 5. 




PUSH HL 






J F640 






OR 40 


2197DD 


LD HL.DRA RET 






AS 






XORB 




EXfSPJ.HL 




Push address DRA 


EEFB 






ANDFB 










RET on stack. 


67 






XORB 


Take bfts 2, 1 and from B, 
Assign high pan of print posi- 


C9 


PUSH DE 
RET 




Call subroutine at 
address DE. 


C9 






RET 




3807 DRARET 


JRC, DRA EXIT 






»■**• 










CD6DDD 
B 


CALL PLOT PIX 
EXAF.AF' 




Plot next pixel of 
























manipulates the A register 

Notice how is starts off with al 


3D 


DEC A 








OVER 


w*p 


esigned to PLOT 


2 OEF 


JR NZ.DRA LOOP 




Repeat till whole 




Dressed 


by 


1. C 


nd HL (as 


loop unti,' it falls in the right posi- 


E1 DRA EXIT 


POPHL 




arm drawn. 












CI 


POPBC 








l-'X 


use 


ul. Th 


trick is the 


tion. It is the XOR (HL) instruc- 


C9 


RET 








'" y 






P which 


OVER S ep0 ° e 


Draw Cursor Subroutine 








C5 


PLOT PIX 


ORG DD5D 
PUSH BC 




We now have ev 


JfVthlng we 














LDA r C 




















AND 07 


A^ = pixel number within 




BASIC and you're 








47 

04 






LDB.A 
iNCB 


ment of pixel to alter. *" 569 


marks in the BASIC 


can write all oft 
to any ad- don't 


his month s material (you 
need to save the test 

) together with part one 




OF PPX LOOP 


LDA, 01 




machine code labs 


TEST. To issue) 


and 


wait impatiently for 




IOFD 






DJNZ PPX 












AE 






LOOP 

XOR (HL) 













50 RANDOMIZE USR t 



CD5DDD 
DDCBOI7E 



CALL PLOT PIX 



CD41DD 
CD6CDD 



CALL PIX ADDR Assign 
CALL OR CURSOR Draw ci 



MAIL ORDER PROTECTION SCHEME 



explaining ihe position nol earlier than 2B days 
from Ihedavvou senl your order and not later than 
2 months from that day. 

Please do not wait until the last moment to inform us. 
in you write, we will tell you how to make your 
n arid what evidence of payment is required. 

accordance with the above procedure as soon as possi- 

insolvent to a limit of £1,300 per annum for any one 
advertiser, so atlc-cicd and up to I 5.40Q p.a. in respect 

higher amounts, or when the above procedures have 

□uickly of reader's difficulties. 

This guarantee covers only advance payment sent in 

CLASSIFIED ADVERTISEMENTS ARE EXCLUDED. 

moion w££b 

FOR SPE C TRUM U SERS 

S.S.O. «KS £7.50 

THIS IS PROBAHI.-. IHE MCST CONTROVERSIAL AND 5EN- 
-■' _'.ai ADVEMTUPE f,AMl YOUVE3F_E:\ WRITE OR OAI I 

GOLD BLAST JBKS £5.75 

STEER WONTt Through the mine shafts, collect 

'■ ". - I MA- 1 -i.isj >OU DON! GAS OR 

■: *. "" P '"(HE 5 GOLD IN THEM HILLS BUT YOU'VE 

COMPUTER CHALLENGE J8KS £4.95 

A GAME OF WITS AGAINST THE COMPUTER. IDEAL FORMUM 
DAD THE kids AND GRANDAD TRV BEATING THE 
COMPUTER IT WILL AMAZE YOU. 

CHAHACTER GENERATOR & 

DRAWING PROGRAM *SKS £8 

■ - ■■' [';."," iES BEAUTIFUL SCALED 

MUSIC MAKER ws £6 

" " ■ • ,,-",.11. SOUND EFFECTS AND MUSICAL 

SOUNDS TO ADD TO ThE PROGRAMME IIS CHFATION Fl ill 
-• », -,.... -.a i :;:■■ ,'.i;|.'Arii',ri.i=r!' ON SCWI i N A 

Cheques/P.O. made payable to; MALAN ASSOCIATES, PO 

8o> 390. Purleigh. Essei CM3 6QO. 

Orders processed tame day. 0621-828763 (2d hra) 



Untuerssitp :§>ofttoan 

LIBRARY OF ADVANCED MATH/STAT/ECON 
FOR SINCLAIR ZX81 AND SPECTRUM 



dQ regressions. Displays 



_ EDUCATIONAL SEHIES . 



SIDE A : Cobb-Dnoslas pr< 
MACROECONOMICS ( + 



X COMPUTING AUGUST/SEPTEMBER 19 



■SPECTRUM LANGUAGE! 



Slogo 



enpanding the number c 



David Nowotnik continues to run rings 

round us with the second part of his 

series for the 48K Spectrum 



number keys on your Spectrum. 
For example, PENCOLOUR 1 



Additional LOCO 

First, type into 



J e LOGO program in part 
[ape, and STOP simply 
he LOGO program, and 
yon back to BASIC. 

ber with all LOGO com- 
to type them out In full 



a equiv 



ctrum the program 
t time, and MERGE 



LOGO 



u look in your Spectrum SETY 10 will move thi 
Book (on page 131) you'll vertically toa point 1 1 dc 
out how high resolution the bottom edge of the 



right. E 

be defined by a 





he printer, SAVE allows vou to 


and moving horiaoot.il, left ,„ 


tangle. 




FULL COMMAND 


TWO LETTER 




ranmpt message at the base of 




ABBREVIATION 


mand You'll need twonumbers 








after SETXY, the first is the 


ya^anTecBMfrom'lastTime'we 


PENCOLOUR 


PC 


-.-coordinate, the second, the 


aiBnds FORWARD, BACK, 
LEFT, and RIGHT to move the 


WRAP 
NOWRAP 


WR 

NW 


the rectangle from the above 


PENUp, and PEN DOWN asaddi- 


COPY 




SETXY SO 1 40 for XY 60 1 401 
and press ENTER 


Bw ^ructions '"whT n°' Hato 


STOP 




rectangle, taking the turtle to 


happen to be the simplest 


SETX 


sx 


beB S n madBusing d olB^kW a on 


SETY 


SY 


is one corner (the top left comer) 

Try a number of SETX, SETY, 
and SETXY instructions for 


nENCOLOUR (or PC) allows you 


SETHEADINC 
REPEAT 


SH 
RP 
















number between and 175. I 









■SPECTRUM LANGUAGE^ 



Fig. 1 The Program Listing ISL0GO2) 



130 1 



-SH-, 






1630, ' 
S200 



"DF",5000, ' 

Z1S DATA "REPEAt',4; 
, "PENCOLCUR",4300, "WF 
OWRAP" , 4430 

220 DATA "SAVE", 4500, "COPY", 452 
0, "STOP" ,4550 

225 DATA "SETX" , 4600, "SETY" , 463 
0, " SETX V", 4660, "5ETHEADING",4700 

230 DATA "DEFINE" ,5000, "EDIT" ,5 

450 DIM r (20, 21 

465 LET def=0: DIM U*(40,200): 
DIM I (401 



1.28) 



DIM 



100 REM PENCOLI 
1J0 GD SUB 1200: 



a>7 THEN LET err=2: RET 
I a: RETURN 



NE 2000: RETUR1 



RETURN 






740 


LET a* 


"DEFINE 


ame er 


RET 








750 


LET a* 


"No room 


tor in 








760 


LET as 


"Incorre 


t Comm 




RETURI 






2140 


FOR i = 


TO r*de 




2210 


IF i<-r 


THEN GO SUB v 


GO TO 2220 






2215 


GO SUB 


6000 




4100 


REM REPEAT 




4105 


REN 






4110 


GO BUB 


1200: IF 


err>0 


RETURN 






4115 


LET s-s 


+1 : IF s 


LEN 21 


LEI 


err=l: 


RETURN 





4130 


LET 


err-1 


RETURN 


4135 


LET 


rc-rc 


1 .' LET s= 


4140 


IF 


c^20 


HEN LET 


ETURN 






4145 


LET 


rlrc, 


l=s: LET 










4150 


RETURN 




4155 


REM 






-J 209 


REM 


: - 


Repeat lo 


4205 


REM 






4210 


LET 






4215 


IF r 


TURN 


>0 THEN 


4220 


LET 


rc=rc- 


11 RETURN 



625 REM 
630 REM 



SET' 



4635 GO SUB 1200: IF err>0 THEN 

RETURN 
4640 IF turt-0 THEN LET turt-li 

GO SUB 1100 
4645 IF a<0 OR a>175 THEN LET e 
T-Zi RETURN 



xZ-x 



xl = 



4655 


REM 












4660 


REM 


SET 


<Y 








4665 




irt-0 


THEN 


LET 




GO SUB 1 












4670 


GO S 


B 1200 


IF 


*rr> 




RETURN 












4675 


IF a 


OR 


a 


255 


THEN 


LET e 


rr- = 2 


RET 












46B0 


LET 


1-i- 




LET 


«2-a 




B 1200: IF err 





THEN RETURN 


46B5 


IF a 


OR 


a 


175 


THEN 


LET e 


rr-2 


RETURN 











■SPECTRUM LANGUAGE! 



4695 REM 

•4700 REM SETHEADING 

4705 GO SUE 1200! IE en 



-1 AND LE 



4715 LET dir»a: RE 

5000 REM DEFINE 

5001 GO SUB 1020: 
N y»<2 THEN LET err=5: RETURN 
3010 IF LEN y*<>2 THEN GO TO 50 
25 

5015 FOR i = l TO ra: IF y*=x5Ii> T 

HEN LET err-51 RETURN 

5020 NEXT i 

5025 LET ym-iy%*" "3 ( 

TO 121 
5030 FOR 1 = 1 TO dettn: IF >.*=«»( 
i) THEM LET err=5: RETURN 
5033 NEXT l: IF flet->39 THEN LET 

err-6: RETURN 
5040 CLS : PRINT "DEFINE ■'!/*'• 
5050 LET def-dpt+l: LET no-0 
5055 INPUT "W: 11 ! LINE z*: IF LEN 



PAUSE : 



0: GO TO 5055 

3«<2 THEN PRINT Kl j 
: PAUSE 200: GO TO 50 

nolTAB Z\zf ' : LET no 

<3 THEN GO TO 50B5 



■"END" THEN 



GO TO 5095 



>-»: pause 200: 



5085 IF ni 
*: LET cCi 
5090 PPIN 



CHR* 0: LET 
5 LET no- 
TO 5105 



5125 CLS : PRINT "STORED - " I yi 
5130 PAUSE 200! CLS 1 RETURN 
5200 REM EDIT 

5205 GO SUB 1020: IF tl-1 AND 1 
N y«<2 THEN LET err-6: RETURN 



5230 BO SUB 5S00 

5240 GO SUB 5950 

5250 PRINT KlI'llEBfT 2!INSER 

T Z: DELETE 4: REMOVE 5IRETUR 

5255 LET i«=INKEV«: 

N GO TO 5255 

3260 IF z«<" 1" OR : 

TO 5255 

5265 LET i=VAL z»: 

5273 GO TO 5235 

5300 GO SUB 5950: PR: 

- Enter the line" 
5305 LET 2*=INKEY«: 
N GO TO 5305 
5310 IF I*<"0" OR **>' 
TO 5305 

5315 LET 1 in=UAL z% 
5320 INPUT f linl i ' 

IF LEN z*>28 THEI 
o Long"! PAUSE 20J 



GO TO 5320 



pace for another 
0! RETURN 
5405 GO SUB 5950! PR: 
RT - Enter line n 
5410 LET zS=INKE^ 
N GO TO 5410 
5415 IF i*< "0" M 
THEN GO TO 341£ 
5420 LET inB-VfiL 



5430 LET ins=ins 
5435 FOR I=k TO 



5445 LET b* t ins)=z< 

5450 LET U-k»l : GO 
5500 LET i*-"DELETI 
50: GO SUB 5900 
5303 IF a*-'N" THEI 

5510 GO SUB 5950: I 



LINE :i: 
GO TO 5425 
STEP -1 



Ente 



pPJCfjfUM LANGUAGE)! 



3320 IF i*< "I 

THEN GO TO ! 

3523 LET b=k 

5530 FOR i-1 

3535 LET b*l 



50! GO SU1 



:move -: go sue 59 
then go to 5235 

>+-l: IF def=0 OR 
RETURN 



3625 LET w* I i)-n*< 

5430 FOR i=ed TO di 

5635 LET k»<)]=k»l 

= 1 I i +1) : NEXT i 

5640 CLE : RETURN 

5700 LET c*- k ": LE 

5705 FOR i=l TO k 



+1J: LET 1( 



3800 


LET 






3B05 


LET 


kSled, T 


5810 


IF 


5815 


LET 


:.S2P 


IF 



en) OCHR* THEN 
en) : LET no-no+1 : 
GO TO 5820 

i=len+l i LET b* ( k J ■ 

ID! GO TO 5810 

Ili^Si "- Are you si 



HEN GO TO 5905 

5913 RETURN 

3950 CLS : PRINT 

5955 FOR i-1 TO I 



5963 RETURN 



: THEN 
i THEN 



6025 LET i 
6030 LET i 
6035 IF ci 



0: GO SUB 2040 



'6050 RETURN 

Direction 



heading! is not changed from , h rt| 
that before the SET instruction \°' ^°^ r 



Immands FD 40 RT 
and in LOGO' which 
mandisREPEATIRP 






the SETHEADING and LEFT ar 
RIGHT commands the 
remember, SETHEADING grvi 
you absolute command of 
heading whereas LEFT i 
RIGHT turn the turtle relativi 



RP4 IFD40 RT 901 and press 
ENTER 

The number after REPEAT |oi 



"■n Nested Loops 



FD 40 RT 90 FT 40 RT 90 FD 
40 RT 90 FD 40 RT 90 


Thetw 


loops are shown b 




TOP OF SCREEN 














315 




45 












225 




S 135 




180 
BASE OF SCREEN 






% 3 A nS to ,o *.«•««» a, SfTHtAom 


™ w 





■ SPECTRUM LANGUAGE! 




1 


HP 5 ( FD 40 RT 1 35 FD 40 LT 63 ) 




2 - 


DRAW PU XV BO 60 PD 

RP8IFD40RT45,RT45 

HP8IFD96RT135I 




3. 


DRAW PC 1 RP 3 1 FD 40 RT 1 20 > 
PC 2 RP 3 ,BK 40 LT 60 I 
LT 90 PC 3 RP 3 ( FD 40 RT 1 20 ) 
PC 4 RP 3 I BK 40 LT 60 ) 




pressingENTERwfien v ougBtio will Our LOGO tra 


n a LOGO 



t entered. You'll 
if Ihe LOGO c 



already be a wars thai ir 






The Key to Spectrum Machine Code Success. 



You willonlybuyone Machine CotteSystemsobuv the besttheone theprofessionalsiise. 



NEW IMPROVED PROGRAMS 

ASSEMBLER 



MICRODRIVE COMPATIBLE 

MONITOR 




PICTURESQUE, 6 CD 



«is@pf Pascal mvmc 

Quality System Software 



HISOFT PASCAL 4T 





r*oi ihr nmn prugiammrr rD ptujtirr Lgli-i| >it-J macnjnr iojr 

any Lim-loo^e ol ihadiinc cojr wliaUoovoi. 

<U»i»rlU. anJ ™„ M „„,„ U™, J.™. Y™ nun, ,„„ fill ,1.™ 
«lk ul.jccu .,„ J pnJJ™ of you, cnoior. H.,;,, s „™J you, J,™,.,. 

A pan lormnj ajtnuurc may Ik ravcj ID tape for lalM ciunpfrn'on 

WU, you L^- .lone «, THF, QVU1 -ill alU you ,o p™J m a „py oi 

„ you, ajv.-u.urt -Urn -ill ™„ imtpmUJy .J ,U maio QUILL coil.,,. 



FOR THE OK SPECTRUM at £14.95 

■V ( . 11 iii-Hiliibli' m larger branches of W. H 
Smith. «,.,.„, J„hn Menztn mul from many 
computer shops nation wide, or direct from us 
by post or telephone. 

SAE for full details of our range. 






GI.LSOFT 



O.U 






iquira uHc ,. 

Crcilil Card Order line 

wi;j:h u.i i-it.i.ui 



X COMPUTING A 



I SOFTWARE REVIEWS^ 



international 
Publishing and 
Software inc. 
(Canada). 



The ZX81 soft 
selection 

Once again Nick Pearce voices his 

opinion on some of the new releases 

for the ZX81 



io, wig- wag flag (in this 
dashes of Morse-code 



md absorbing to still be developed to 

i be saved at any good game. 

epoint at which tram D. Pinch. 72 Ni 

d. cent. Co l .-if.i-i ■■■:.■!■.. t 

with other TRS Glamorgan. 







There are ten mazes in all, anc 










normal ZX81 loading speed. TRS 










next maze-level in the game. The 


levels than the norma IZX 81 save: 


game also includes a persona lis- 
















and enjoyable game. With prac- 
















perienced arcade game Players. 


TRS Software are at 19, 














Ontario, Canada M3J2W6. 


Space Rescue 


Space Trek 


d. Pinch 




Space rascue is a novel arcade- 






Space Trek is a very good quality 





Galaxyjailbreak 
Romik Software. 



left or right, and of couri 



speedsnake g aiax V ,and< 

International KlB1 9° n " Bi 

Publishing and t^UdSe" 

Software Inc. Thegalaxy is composed of 100 and there a i 



(Canada) 






ofl quadra 
1 00 sect 


tis ficulty. 

rs. Space Resc 


Pha,1 


e poten- 


gets increasingly difficult to play 




















































type gam 














sUe around a ™' e 


' 


This last mode 




al. galaxy, searchi 


^"r', 




Ftomlk Software are at 272, 


















pea, a, random.hu 


the berne 




a upon 




" o- 3 


Space 




a™™** 


S6PT19B4 















ITEwrr I II 1 1 I p^^^^^^^^J 

Thmchors 

S J Patrick of Harrow presents this 

useful program that puts the S0UBR7R 

on your screen. "■»■""•" 



of the screen instead be LET as = CHR* . + CHRS , 
isl 32. Each character + "t e «t" + CHR5 128. Then 



Loading the 
character table 



i. The shapes of Ihe 96 the s 
cters (codes 32 to 1 27) top. 



hows the 480 bytes 



[PAPER, INK. INVERSE, OVER, 
etc} can be set before THIN- 
CHARS i: 



called Two ROM 00 00 as , 00 gg 00 00 -, 

ermenent'steena, M ** ** ™ ** ™ M 24 

nylltoSsl^mwtiT^l^ Idd,els\n°hehTreg4te r To7e't ^ " ^ 0S ' 6 26 2C Si 

™"USR S n" ft s h t« faC,th t at - When h qUare ' ' ThiS iS d ° nB at Xh ™ e * "* PB 3C q2 BB 0a * 2 3C 

icuted in BASIC, the be register each character' althevrnf h' ™. ro 10 5 * 3 8 51 10 08 

s loaded with o, the start ad- in different attribute squares ) 08 3E 3e 08 B ® 01 06 00 

™?NChuSst 8 k 2 l 5i, B „ 1^^;"™:^™ BB * s 0S 0G » 8 09 00 * 6 



S3 52 2C 0C 14 24 7E 
^2 52 52 32 4C 3C 52 



i/ed (SAVE "thir 
E 64600,6791 



ig BASIC crogri 

Dr loading: (ad 



10DEFFNhlp$) = C0DEpS - 48 


-;.,„> »*■•■> 






30 INPUT "Start address' "a 




40 INPUT (b|, LINE aS 




50IFa$f1l = 'VTHENSTOP 
















90 LET a = a + 1 : GO TO 40 





I 02 02 02 ?c 7E 
IB 20 7E 7£ 22 



« 



fM .-£ 3i ; si; 5 -j 4C 3C 52 ■ 

52 32 0C 40 42 44 4S 70 ■ ■ I 

2C 52 52 32 2C 30 48 48 III 

48 3E 00 00 24 00 00 00 111 — 

02 2C 00 00 00 8 14 2 2 f IfO 

00 14 14 14 14 14 00 22 ' "I 

14 08 00 3P 40 4A 4B 30 

3E 41 4C 52 3E 3E 4B 40 If 

48 3E 7E 52 52 52 2C 3C I ■** 

42 42 42 24 7E 42 42 24 If 

15 7E 32 52 52 42 7>E 50 H 
50 30 40 3C 42 42 4A 2C If 

y l i? lSf 10 7E BB A2 yE "n 

ilJ 
:::ti S 



7E 48 48 4B 30 3C 

44 3A 7E 48 4S 4C 32 2 

52 52 52 4C 40 4 

40 7C 02 02 02 7 

02 04 78 7C 02 1 

46 28 10 28 46 60 10 

10 60 46 4A 52 52 62 



12 3E 52 52 42 I 



22 22 22 12 0C 



02 13" 02 I 



2A 2ft 2A 24 20 7C 22 22 

02 04 38 3C 02 1C 02 3C 

22 14 08 14 22 3? 05 05 

05 3E 22 2a 2ft 32 22 00 



I SPECTRUM UTILITY! 



022 010600 
026 09 
026 5E 



Description of 
program THIN.CEN 



BEEP in li 



041 CB3S 
043 CB3B 
045 CB3B 



is of THINCHARS; checks 



e character set 

5Bt Ion VBllOW PAPER, so 



machine code 



load che racier p 



007 CD4DOD 

010 012700 

013 DD09 

015 2A4B5C 

01 B 7E 



I SPECTRUM UTILITY I 



|-,U 


3E1F 


M! 


A5 




FE1F 


r.i 


2094 


lh 


79 


m 


FE40 


IH 




H(l 




HV 




HH 




'■ ::■ 


7C 


flR 


67 




EB18 


H1 


EE18 


9H 


2080 


9b 


2640 



J 

H 



THEN GO TO 400 
THEN GO TO 500 



LET a= 
FDR >•■ 



THEN 
TO 4 
PEEK 



GO TO 310 
base«39*5* C 



I B S J Pati 
IIM CHARACTI 



NCHAR5 routine? -|b 


140 


IF PEEK base-197 TH 


TO 


200 


130 


PRINT -THINCHARS not 






16? 


STOP 


200 






210 


LET e*(l>= CHR« 


220 


LET 5 S<2>= CHR* B 


230 


FOR i=32 TO 1-=B 


240 


LET s*(i-29) - CHRS 


230 


BEEP .002,0 




NEXT i 


270 


GO SUB 600 



N* I i*="B" AMD x<4) 
380 LET ?*y-tl«*>7*. AND y>0> 
♦ !i*="6" AND ><<7) 
390 GO TO 310 
400 REM lead grid 

c 

H 
A 
R 
S 



LET a=2*a 



496 


GO TO 300 


500 






^10 


INPUT 'Character to s 




515 


IF CODE i*<32 THEN 




31P 


520 


FOR »=0 TO A 


330 


LET *-»! LET b=12B 


340 


FOR ;=P TO 7 


530 


IF POINT !105*S*x 




y) THEN LET a=a» 


560 




370 


NEXT >• 


580 


POKE base+39t5# COD 






590 


NEXT » 


593 


GO SUB 600: GO TO 300 


600 


REM print char 


610 


PAPER 6: LET 1= USR b 


620 


PAPER 7: RETURN 



^^^^^^^^^^^m came p^^^^^^^^^nn 




Your brief is to take charge of 


After each set of inputs the 


500 


the landing ol the first in- 


screen will dissolve and then 


300 IF H-0 AMD '.'>50 THEM GO TO 


probe oo t he plan etH t ra e S -"l he 


AMhooqlw he descent rnust'not 


500 


home of a backward race. Being 


exceed 300, you will have to 


310 IF H-0 AMD >„'<51 THEM GO TO 


B remote controlled probe 


reduce the final landing velocity 


600 


pareecs'distant b tnere fe P a™rne 


t h e 5 |a n d'in n S A nd° of c ou istT'tne 


350 GO SUB 700 


lag which causes your craft 10 


site must be (toll' 


360 PRINT CHR« (8MCHRS (136) 


respond sluggishly. Added to 


It is possible to land using 


370 FOR K-Z TO 15 


atonal is'e^lremely^ense (ike 


will* not "seem ' f e as'ible^'l "fiist' 


380 PRINT 


its inhabitants!) and causes the 


Once you have mastered the 


390 NEXT K 


probe toaccellerate rapidly The 


game, you can increase the dif- 


400 GO SUB 800 


below 300 or you will burn up, 
proble until you find a suitable 


variable "A" or by adding the 

450 If H>600 THEN GOTO 
110 


110 LET T-U 

420 LET L=M 

4 30 INPUT U 

440 INPUT M 

450 IF L>9 THEN GO TO 110 

460 GO TO 200 




fmmsem 


1 cursor flashes input the main 


TheZXBU boldly approaches 


590 LET 2-15 

510 GO SUB 700 


1 rocket thrust this is deducted 


"l e '"? al f'ontier of RAM. so any 


529 PRINT CHR* (1361ICHR* (8) 


1 :;™™v*itrx h, «* 


■;'t?rvr ".-t"t"\ displays — a final 


530 GO SUB 809 


1 =1 , », , .'V.:. , .'V;;,™r"„'° 




340 PRINT 




'° 'X^Xwttsto any planet 


359 PRINT "PROBE CRASHING" 
560 STOP 

600 IF YID*1)=3 OR Y(D+2)=3 THE 
M GO TO 500 
610 GO SUB 700 




aaaasaa ■»— 


10 DIM YI20I 


it 






620 PRINT CHR0 (81ICHR* tl36> 






630 GO SUB B00 


40 let T-e >•*?* y^n 


jt- 


£40 PRINT 


™ S !;l!,»« n * *^Sr 




650 PRINT "PRDBE LANDING" 


«- 


660 STOP 


70 .FT --.-a sJ^MKf 




700 PRINT "HEIGHT", "SPEED", "ACC 


80 LET A=30 (X wBk& 


-*• 


LN-, "FUEL" 


90 LET F-3000 V_^B**^ 


^ 


710 PRINT H,'J,A,F 


100 LET D-S 






'20 FOR K-l TO Z 


110 FOR K-l TO 19 






'30 PRINT 


120 LET YlfO«RNB<3> 






*40-M£KT— K 


130 NEXT K 






'50 FOR K-l TO D 


140 LET YI20!-3 






'60 PRINT " "| 


20(3 CLS 






'70 NEXT K 


210 LET F=F-T-ABS IL)*10 






'00 RETURN 


220 LET V-U+A-T 




800 FOR K-l TO 20 


230 LET M->4-V 




810 IF Y(K)-3 THEM GO TO 840 


240 LET Z=16-(H.'100) 




820 PRINT • -| 


250 LET A-A-tZ*:* 




S30 GO TO 850 


260 LET D-D + L 




840 PRINT CHR* (128M 


279 IF D>20 THEM LET D-20 




850 NEXT K 


280 IF H<0 THEM LET H=0 


V. 


860 PRINT 


290 IF F<0 OR V>300 THEM GO TO 


-T^ 


870 RETURN 


The final 1 


3 j * ] 1 1 ■! r ^ j 


The ZX80 is alive and well and lives in Bath with 


1 A programmer Peter 


Austwick. His challenqinq . 


| "*" graphics 


game 


is 


a must! & \ 



Britain's Best Magazine 
For The Sinclair user 



£ 



l@®EDPOMEIE 



Don't be disappointed — make sui 
get every issue of ZX Computing! 

Just £12.70 will ensure that 
six issues will be lovingly wrapped 
posted to you. Just fill in the form 
below, cut it out and send it with 
cheque or postal order (made pay: 



ZX Computing Subscriptions 

Infonet Ltd, 

Times House, 

179 The Marlowes, 

Hemel Hempstead, 

Herts HP1 IBB, 



tentatively you can p£ . 
rclaycard: simply fill in youi 
■m and send it off. Do NOT 




Cut out and SEND TO: 

ZX Computing Subscriptions, 

Infonet Ltd, 

Times House, 

1 79 The Marlowes, 

Hemel Hempstead, 

Herts HP1 IBB, 

£12.70 for sin issues 
UK 

SUBSCRIPTION £14.20 for six issues 
RATES overseas surface mall 

(tick _i as £25.00 for six issues 
appropriate! overseas airmail 

L 


□ 

□ 

D 


Subscription Order Form 

n -» tSSn i»ti_^M' 

ZS.'-.U,.., ru „ e=3 


Lllll III 1 1 1 1 1 

Plaise u sa BLOCK CAPITALS and Include DC at codsi. 















BOOK NEWS 



Bookshelf 

Patrick Cain browses, and reports his 
— I findings. 



MICRODRIVE EXCHANGE. 




Beginners and 
assembler 


theory, is that there are plenty o 
books which teach Machine 


Two Books from McGraw Hill, 


that demonstrate techniques o 
TheTook contains severa 


The ZX81/TS1000 Home 
Computet Book by David C. 

made easv and a reference 
rianual As with so many ol 

case of rinding The particular 
author or style of presentation 
which appeals to you At E9.95 


in the readers own games and in 
Draw, Circle, Counting r s °I 
dom Nds. Keyboard. Move 
ment. Sounds, Aiu, Pent and 
Screens, The printer. Convert- 

of routines and i-e usual 


t as it may be just what suits 
ou. 307 pages. 


A tape ot the programs is 
withtheMcGrawH.il" ZX Spue 



Language Prog. 



In Brief.... 

in L " delsta B L< N " MBERS ° r rs,ha ' sc,8Bn Photographs. Dorl- 
™ri™ ^Hir , H l ? aUTi,u |it: P f0 ? ucad bookTfa, tne 8 Specimm in™a 
«™mm^ % ,1[ Be -7 n v S = Dt ' A "0'°P r| a'«IV titled Step by step pro 
gramming tor the ZX Spectrum books 1 El 2 and written by Ian 
co™ r"d ™ SI , aSBeCts of s P ec trum BASIC programming is 

• USEFUL PROGRAMS David Hole has written a book called 



The book contains fourteen programsofthe gas/electricity bill 
"0K P s e o S ou^Je CeOUn rj 'h""' S ° " v ° u ' re,ad UD " i,n eo P |e s "vin 8 

• HOBBIT HABIT Probably the most frequently written about or 
HoSS*"" la " d Cussedl pr °9 rJ,m is tns Hobbit from Melbourne 
Quick to recognise a good thing they have now published a 
boo* called "A Guide to Playing the Hobbit" by David Elkan at 
' ^^- ^'^S 1 ^ "TlX a 5*im volume it comarns much vaiuebleio 



•AOVANCED PROGRAMMING Ian Sinclair has written a 
weighty tome in the form of introducing Z80 Assembly 
Language Programming, published by Newnes Microcomputer 



qU S P eed is essential for mos 


beyond BASIC but has not yet 


feel happy with "The scheme which is followed is that 'of «" 






getting the most out of the 


when programming. 


in^ry'r^^msh'ourwith 1 ^^ "' ^ e "° Dnent ,a " ,inu '<* 


be used In conjunction with ar 
assembler and that the reader 


SH Microdrive 
mysteries 


• TERMINOLOGY EXPLAINED The Colour Coded Guide fo 

M ' c, ? c ^^ D ^ r B ' 5 ty Ar,hl " G°dman, published by Macdonald 6 








T,,-*","""".,— 


we received "Make the Most of 
Your ZX Microdrive" by Ian 


.h„s 1 ,. , „":r""'""""'"""'™ •"■*■"""•"'■*« 



BOOK NEWS 



Bookshelf 

Patrick Cain browses, and reports his 
~l findings. 



MICRODRIVE EXCHANGE. 




in by G. , 



Jf of t 



ZX Gui 



Sinclair at £4.95 which is full of by this newsletter was S 

wonder loVflnl 8 "^ ' a ' eSl te "' accurfl,e alld usel "'. * 
way to transfer around 75% lb 

tware is clearly explained. 
A: ihi ; = Kiaije I must make i 
nr that I am nut advocatini 



Beginner5 and theory, is that there are plenty of 

assembler b °° ks *l«* <ea=h Machine 

code mechanics but few indeed 



In Brief.... 

• LEARNING BV NUMBERS or rather screen photographs Dori- 
ing Kindersley Ltd have entered the computing arena with two 
«. r r?« ^ ] '™- , *> aM ''"»¥ produced books for the Spectrum in a 
senes celled Screen Shot. Appropriately titled Step by step pro- 
fi™h™ 9 . S P ac "" rT> boo,<s ' & 2 and *"'«en by Ian 
coveTd" f B S S P ecIrum BASIC programming is 

• USEFUL PROGRAMS David Hole has written a book called 
Interface, **" "" "^ MlcrDC0m P u,er ln **» Home, published by 

The book contains fourteen programs ol the gas/electricity bill 
"fW P ™?1 n " acct ""«. , VPe, so if you're fed up with people saying 



The ZX81/TS1000 Home 
Computer Book by David C 


in the readers own games and in- 
clude Colour printing Plot 


i.™nr.assss;'ssiKss'™4is!." ,, " us 




Draw, Circle, Cou-tinr,. R B ~. 


• HOBBIT HABIT Probably the most frequently written about o 


manual. As with so many of 


dom Nos. Keyboard. Muve 


rtoSS** 1 la " d CUSSBdl P [ °9""" is the Hobbit from Melbourn 




Screens, The printer. Convert- 




author or style of presentation 


mg programs Plus a breakdowi 


■ >q A Guide to Playino the Ho 
■^-..ughonlyasiimvolSmeiteZaLmucrJlablein 














you. 307 pages. 


Illthf D e rog n rams U L P rcomM'bi 
















at EI7.95 is 160 pages of ad- 


Just the ticket for the pro- 




vanced programming techm- 






Speed is essential for most 


reached the stage where he/she 


feel happy with The scheme which is followed is thai of ex- 

1 0000000 added to the actual value of the exponent Wl Ce 
n binary), then rush out with your £5.95 and buy it, 

• TERMINOLOGY EXPLAINED The Colour Coded Guide to 

lUUrl by Arthur Godman, published by Macdonald & 
Coat El 0.95 in hardback or £6.95 in paperback can best be 


getting the most out of the 


when programming. 


be used in conjunction with an 
assembler and that the reader 


SH Microdrive 
mysteries 






• CS,, ndo „. t , Bplludin 


we received "Make the Most of 


hould have n" 1 " 1 <tS B vaiLJBll ' e 'defence woi* and every school 



^PROGRAMMING TIPSl 



Conversion tips 



A guide to ZX81 /Spectrum program conversions 
from David Nowotnik. 



iions of BASIC of 



SCROLL and UNPLOT. 



idPLOTappe* 
er lip: PEEK ay 



Graphics; ZX81 use 



ZX81 


Spectrum Comrr 


tntl 






SCROLL 


RANDOMISE USR 3582 If the 
LET t = USR 3582 option 


If so, 


rain 




PLOT Y,X 


PRINT AT 21 -V/2.X/2; Print t 


e" H pp 


£rta 


e'quart 


UNPLOT Y.X 


PRINT AT 21 - Y/2.X/2; Print a 


^:V 


££ 


«™ 


«•'"" 


'two***** 









Spectrum 

BIN 

eg LET v = BIN 



READ/DATA 
eg READ x,y 
DATA 50,60 

OEF FN and FN 

eg DEFalxl = SQR * 

LET t- FN all) 



12S 64 32 16 8 4 2 1 



LETXS = "SdR X' 
LET X = I 
LETT= VALXS 



HZX81 use the 
er Defined 



available on theZXBl. 
REAO and DATA are 



The defined function can 



SCREENS 

eg LET a - SCREENS x,y LET A = PEEKfPEEK 1 6 
+ 256-PEEK 16387 + 



Used in interactive gam. 



IPROCRAMMINO TIPSB 



ZX81 




Spectrum 


Comments 










Both computers have 




POKE 16436.25 




POKE 23872, 0:POKE 2367 






POKE 16437,255 












LET t = IPEEK 23672 + 256" 








PEEK 


PEEK 236731/50 
















/50 

2 Line number le 


ro 


23674 as well, 


the start. The counts 
only be used for 1 

Converts the first lin 


ninutes. 


POKE 16510,0 




POKE 23756,0 

(As the start of BASIC can 


program to line num 


ed, and 


3 RAMTOP 












256"INT 


CLEAR x 






IX/2561 










POKE 163B9, INTIX/256) 




X, for storing data, r 




MJDnWli 


WWMMtofl 


MM* 


code etc. 






BEEP 


FORMAT 


ATTR 






BORDER 










BRIGHT 


INVERSI 










MERGE 










MOVE 


OVER 






CLOSE 




POINT 






DATA 


OUT 








DEFFN 


PAPER 


VALS 








READ 








ERASE 


RESTORE 






FLASH 










T.U, 4 &«*», 


uncfon, not 


wjhtaumttmatat. 







'Use your skill and strategy' says 



,*3i*j|QlUIJ0fr 



'with the No. 1 Football Game ' 



tf&aJ 




*1MU\?K\t\*\\ 



Some of thefettunsof thee 




, ' "•: ■ 


{<'■'■■ 


• 



I PROGRAMMING TIPSI 



Pe-bugger 

Getting a program typed in is often only the 
start of your problems. Ed to the rescue. 



PRINT VI -ft. HMwftw 
PRINT X l' [SI Nmw.-o 
PRINT a; I ■■!■.. I.-a 




i reported is greater I 
5 in the original DIM st 
is not an integer or is 



follow tin 
ceeded tr 






hied a RETURN commar 

rthanviaaGOSl.iF.f ins:riji 

Check a GOTO hasn't bee 

red in place of a GOSUB. READ. 

:k for a missing GOSUB. 



PRINT AT 0,33 - not a 
Check any vannhlss m« 



'edwithaLINE 
berl. Good proqia'nni ■!■; 
illv RESTORES to the cor- 



.. ,gh 



IFX>10THENLETX = 10 

4 Out of memory 

As well as for programs whl 



E Out of DATA 



.... .rogram set RAMtop. number of DATA it 

-'-""■ WW N up -- usually a LET Before despairing, enter CLEAR the number of REA 

or FOR command. Did you leave USR'a '-1 on the Spectrum' on one (or morel has b 

i! out? Does the program get the ZX81 SAVE the program, out A;tem-n,nu i, 

there -or has a GOTO/GOSUB turn the machine off and on, DATA DM without I 

been wrongly addressed? then reload the program. RESTORE commanc 






ZX COMPUTING 



E3 SE 



. ■ ■ :■ n-:. on-.::; 



01 - 437 0699 

Send your requirements to: 
JANE EDMUNDS 
ASP Ltd., 1 Golden Square, 
London W1 



SPECTRUM SOFTWARE CLUB 



:Z 


;Esr™ 


Sfffi^'p 


sax™. 


t Ev™ 


'ne^meff 


j^SJJVn 


:E BLANK CASSETTE 


tzv 


Bs^e 95 "" 


d*e«illru 5 h 


yo.yo.rmemoershlpklUr.o 










M 




•JijL 


33 














CURRENT SPECTRUM PROGRAMS 

Tradewind {£5 Cassette, £9.50 Microdrive) 



Jersey Quest (£5 Cassette, £9.50 Microdrive) 



Morse Tutor (£4 Cassette. £8.50 Microdrive) 



SPECTRUM SYNTHESISI 



■e. Buiy SI Edmunat. Suffolk 



SOFTWARE APPLICATIONS 



SPECTRUM 
48K 

MOVIE-MAKING 
ANIMATION & MUSIC 

Prog. £7 incl. 
MORSE-CC 





SPECTRUM 48K 

BOOK-KEEPING AND MONTHLY 

FINANCIAL ACCOUNTS 

BY A. G. CLOUGH F.C.A. 

MANX TAPES, GAREY VEG, GLEN AULDYN 
RAMSEY, ISLE OF MAN. 






SICK OF BLASTING 

BORED WITH POINTLESS 
"ADVENTURE GAMES?" 

Tool Kit" to solve all ana- 




POOLS PLAN CHECKER 



X COMPUTING AUGUST 



E3nS3B3ESJHIE 



Pooli Prediction 
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Machine Code Graphics 
in 3-D for ZX 81 16K. Co- 
ordinates XYZ any view 

GAD. casette anO in- 
structions only £5.95 • 
£1.05 Post and Packing 
Send cheque to: 
Danny Hladhy, 
Software Research 

Krlmmerslr. IP 

D-6050 Oflenbach/M 

West Germany. 
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. USE ZX CLASSIFIED!! PHONE JANE ON 01-437 0699 



■§<- 



ZX COMPUTING 
CLASSIFIED ADVERTISEMENT — ORDER FORM 



If you have something to sell now's your chance! Don't turn the page — turn to us! 

Rales of charge: 40p per word per issue (minimum of 1 5 words).Please state classification 

and post to A & B COMPUTING, CLASSIFIED DEPT, 1 GOLDEN SQUARE, 

LONDON W.I. 





































£5.25 
























£8.75 












£12.25 












CI 4.00 


Please place m 


advert in ZX COHF 


UTINGtor is 


ues commencing as 


soon as possible 
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A.G.F 12 

ANIROG 27 

APS 30,31. 131, IBC 

AWB 116 

ADDICTIVE GAMES 133 

BROTHER INDUSTRIES 19 

BUFFER MICRO 62 

CHALLENGE RESEARCH 41 

COMPUSOUND 62 

CAMBELL SYSTEMS 89 

DKTRONICS OBC 

DURRELL SOFTWARE IFC 

ELECTRIC SOFTWARE 00 

GILSOFT 122 

HARE SOFTWARE 71 

HORNBY SOFTWARE 51 

INTERFACE 6 

KELWOOD 110 

KUMA COMPUTERS 96 

KELAN 45 



MEOW MICROS 

MARCOL CABINETS . 
MALAN ASSOCS 



, 116 



NATIONAL SOFTWARE LIBRARY . . 96 

ORION DATA 67 

ROMANTIC ROBOT 51 

SOFTEACH 110 

SKYWAVE SOFTWARE 62 

SCI-SOFT 45 

SOFTWARE SUPERMARKET 3 

TASMAN SOFTWARE 87 

TROJAN MICRO'S 24 

TECHNOLOGY RESEARCH 96 

TUTORIAL SOFTWARE 103 

UNIVERSITY SOFTWARE 103 

ULTIMATE PLAY THE GAME 34 

WIZARD SOFTWARE 62 



ASP SOFTWARE 

Presents 
The Greatest Challenge Ever To Face Man And Machine 



FIVE MILLION BARBARIAN S^ 
AN ARMY OR TWO i ^ _, . . „ 

PERSIANS JL^I | HIl 

SEVERAL THOjB I ■„. . . „ r 
UPSET ARMfyJH I FA L L OF 



ROME 




e ot difficulty, Order 
from: Argus Press 
Software Group, 
NO! Golden Sojiare 

/V1R3AB 

Please MttSOpoSp 
and allow 14 days 
for delivery 
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THE FINAL TOUCH 



The 15" x9" x3" i 
your Spectrum ar 
power supply etc. and forms an attractive 
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]h density block ABS 
! stepped • 



H^H 



All connections 
accessible at rear 

4 

Separated, 
numeric \ 
keypad \ 
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